diff options
Diffstat (limited to 'testsuite/tests/ghci.debugger/scripts/print003.script')
| -rw-r--r-- | testsuite/tests/ghci.debugger/scripts/print003.script | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/testsuite/tests/ghci.debugger/scripts/print003.script b/testsuite/tests/ghci.debugger/scripts/print003.script new file mode 100644 index 0000000000..8544f46231 --- /dev/null +++ b/testsuite/tests/ghci.debugger/scripts/print003.script @@ -0,0 +1,15 @@ +-- Simple Recovery of types - opaque types +:set -XExistentialQuantification -XDeriveDataTypeable -XGeneralizedNewtypeDeriving +:l ../Test +let t = O (map Just [[1,1],[2,2]]) +:p t +-- should have bound _t1 now +:show bindings +seq _t1 () +:p t +:show bindings +seq _t2 () +:p t +seq _t4 () +:p t +:t _t7 |