diff options
| author | Pepe Iborra <mnislaih@gmail.com> | 2007-12-19 19:19:32 +0000 |
|---|---|---|
| committer | Pepe Iborra <mnislaih@gmail.com> | 2007-12-19 19:19:32 +0000 |
| commit | 4e21a089f15a21bbdf6d2e8fa0f68ec91207f149 (patch) | |
| tree | 35a7cc0464a81d211df8189dd9ef8fa533a30d20 /testsuite/tests/ghc-regress/ghci.debugger/scripts/print032.script | |
| parent | 9b4ee312cceaaf8d59c2ec6fdae9665e2733a5b0 (diff) | |
| download | haskell-4e21a089f15a21bbdf6d2e8fa0f68ec91207f149.tar.gz | |
Unsoundness in the RTTI scheme
Diffstat (limited to 'testsuite/tests/ghc-regress/ghci.debugger/scripts/print032.script')
| -rw-r--r-- | testsuite/tests/ghc-regress/ghci.debugger/scripts/print032.script | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/testsuite/tests/ghc-regress/ghci.debugger/scripts/print032.script b/testsuite/tests/ghc-regress/ghci.debugger/scripts/print032.script new file mode 100644 index 0000000000..fa872af5d3 --- /dev/null +++ b/testsuite/tests/ghc-regress/ghci.debugger/scripts/print032.script @@ -0,0 +1,8 @@ +:l print029.hs +let a = MkT2 [Just (1::Int)] +a +let b = MkT2 (map Just [2::Int]) -- Want to obtain a thunk +:break f2 +f2 a b +:step + |