Commit dc5ae80c authored by simonmar's avatar simonmar
Browse files

[project @ 2000-06-09 13:48:09 by simonmar]

Guard failure will now throw a PatternMatchFail, the
NonExhaustiveGuards exception is to be removed.
parent 0416c6e7
......@@ -41,7 +41,7 @@ test1 [] = ()
guardTest = catchAllIO (case test2 of () -> return ())
(\ex -> case ex of
NonExhaustiveGuards err -> putStr err
PatternMatchFail err -> putStr err
other -> error "help!")
test2 | all (==0) [1] = ()
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment