Repository : ssh://darcs.haskell.org//srv/darcs/nofib On branch : master
http://hackage.haskell.org/trac/ghc/changeset/35be7d976116e83d9cdea7145bbefb117d4a771f >--------------------------------------------------------------- commit 35be7d976116e83d9cdea7145bbefb117d4a771f Author: Simon Marlow <[email protected]> Date: Mon Jul 9 16:27:47 2012 +0100 Prelude no longer exports catch >--------------------------------------------------------------- real/prolog/Main.hs | 4 +++- 1 files changed, 3 insertions(+), 1 deletions(-) diff --git a/real/prolog/Main.hs b/real/prolog/Main.hs index 55c77fd..d98d217 100644 --- a/real/prolog/Main.hs +++ b/real/prolog/Main.hs @@ -14,6 +14,8 @@ import Engine import Version import Data.List(nub)--1.3 +import System.IO.Error (catchIOError) + --- Command structure and parsing: data Command = Fact Clause | Query [Term] | Show | Error | Quit | NoChange @@ -39,7 +41,7 @@ signOn = "Mini Prolog Version 1.5 (" ++ version ++ ")\n\n" main = --echo False abort putStr signOn >> putStr ("Reading " ++ stdlib) >> - catch (readFile stdlib) + catchIOError (readFile stdlib) (\fail -> putStr "...not found\n" >> return "") >>= \ is -> if null is then _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
