diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2011-10-21 17:26:20 +0100 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2011-10-21 17:26:20 +0100 |
| commit | 13b8cc9116aa2f210c3b9766e606cfe0222c3459 (patch) | |
| tree | 59aaa920b011c9e96d88fdcd2a11cbf2bdb6fb4c /testsuite/tests/ghci/scripts/T5557.script | |
| parent | dcd2f02edb76bcefd8ba4d0c22eea5c72dbf1506 (diff) | |
| download | haskell-13b8cc9116aa2f210c3b9766e606cfe0222c3459.tar.gz | |
Test Trac #5557
Diffstat (limited to 'testsuite/tests/ghci/scripts/T5557.script')
| -rw-r--r-- | testsuite/tests/ghci/scripts/T5557.script | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/scripts/T5557.script b/testsuite/tests/ghci/scripts/T5557.script new file mode 100644 index 0000000000..5ff79a7993 --- /dev/null +++ b/testsuite/tests/ghci/scripts/T5557.script @@ -0,0 +1,4 @@ +-- Both should raise an exception +([seq (seq undefined (\a -> error "a"))] !! 0) [1] +([seq (seq undefined (\a -> undefined))] !! 0) [1] + |