diff options
Diffstat (limited to 'testsuite/tests/ghci')
| -rw-r--r-- | testsuite/tests/ghci/scripts/ghci055.script | 7 | ||||
| -rw-r--r-- | testsuite/tests/ghci/scripts/ghci055.stdout | 3 |
2 files changed, 10 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/scripts/ghci055.script b/testsuite/tests/ghci/scripts/ghci055.script new file mode 100644 index 0000000000..46a08a2bc3 --- /dev/null +++ b/testsuite/tests/ghci/scripts/ghci055.script @@ -0,0 +1,7 @@ +let x=undefined +let y=3 +:force x +:show bindings +-- in 7.3 and earlier this used to print just "*** Exception: +-- Prelude.undefined", now we see bindings for x and y, and x's value +-- is printed as the exception. diff --git a/testsuite/tests/ghci/scripts/ghci055.stdout b/testsuite/tests/ghci/scripts/ghci055.stdout new file mode 100644 index 0000000000..fa2acbec06 --- /dev/null +++ b/testsuite/tests/ghci/scripts/ghci055.stdout @@ -0,0 +1,3 @@ +*** Exception: Prelude.undefined +y :: Integer = _ +x :: a = *** Exception: Prelude.undefined |