Commit ab724eab authored by Ian Lynagh's avatar Ian Lynagh

Tweak break017

parent a589f829
......@@ -2,7 +2,10 @@
:set -fbreak-on-exception
:trace qsort ("abc" ++ undefined)
:back
putStrLn "Printing 1"
:print as
putStrLn "Forcing"
:force as
-- this should print the exception
putStrLn "Printing 2"
:print as
......@@ -4,6 +4,9 @@ Logged breakpoint at ../QSort.hs:6:23-37
_result :: [Char]
a :: Char
as :: [Char]
Printing 1
as = 'b' : 'c' : (_t1::[Char])
Forcing
*** Exception: Prelude.undefined
Printing 2
as = 'b' : 'c' : (_t2::[Char])
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