Fold integer-simple.git into ghc.git (re #8545)
[ghc.git] / testsuite / tests / ghci.debugger / scripts / print002.script
1 -- printing of Showables
2
3 :set -XExistentialQuantification -XDeriveDataTypeable -XGeneralizedNewtypeDeriving
4 let f = Just (1.2::Float)
5 f
6 :p f
7
8 let i = Just (10::Integer)
9 :p i
10
11 case i of Just j -> Control.Exception.evaluate j
12 :p i
13
14 :l ../Test.hs
15
16 let s = S1 'a' 'b' 'c'
17 s
18 :p s
19 :sp s