testsuite/tests/ghci/scripts/T13699.stdout


1
2
3
4
5
6
7
8
9
10

type Foo :: *
data Foo
  = Foo {foo1 :: Int,
         foo2 :: !Int,
         foo3 :: Maybe Int,
         foo4 :: !(Maybe Int)}
  	-- Defined at T13699.hs:3:1
type Bar :: *
data Bar = Bar Int !Int (Maybe Int) !(Maybe Int)
  	-- Defined at T13699.hs:10:1