Repository : ssh://darcs.haskell.org//srv/darcs/packages/base On branch : master
http://hackage.haskell.org/trac/ghc/changeset/84cc6ed3b341926d8fc7f3532a480fc3ec57f8ea >--------------------------------------------------------------- commit 84cc6ed3b341926d8fc7f3532a480fc3ec57f8ea Author: Ian Lynagh <[email protected]> Date: Fri Oct 14 19:11:22 2011 +0100 Fix build on Windows >--------------------------------------------------------------- GHC/Conc/Windows.hs | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/GHC/Conc/Windows.hs b/GHC/Conc/Windows.hs index fecbb20..49a9184 100644 --- a/GHC/Conc/Windows.hs +++ b/GHC/Conc/Windows.hs @@ -277,7 +277,7 @@ start_console_handler r = return () Nothing -> return () -toWin32ConsoleEvent :: Num a => a -> Maybe ConsoleEvent +toWin32ConsoleEvent :: (Eq a, Num a) => a -> Maybe ConsoleEvent toWin32ConsoleEvent ev = case ev of 0 {- CTRL_C_EVENT-} -> Just ControlC _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
