1 -- This test checks that constructors with strictness annotations
2 -- at least parse correctly. In GHC 2.02 they didn't!
6 data Foo1 = Crunch1 ! Int ! Int Int deriving( Show )
8 data Foo2 = Crunch2 ! Int Int Int deriving( Show )
11 print (Crunch1 (1+1) (2+2) (3+3))
12 print (Crunch2 (1+1) (2+2) (3+3))