[project @ 2001-08-22 12:24:41 by simonmar]

[ghc-hetmet.git] / ghc / tests / programs / strict_anns / Main.hs

diff --git a/ghc/tests/programs/strict_anns/Main.hs b/ghc/tests/programs/strict_anns/Main.hs
deleted file mode 100644 (file)
index b2ee82d..0000000
--- a/ghc/tests/programs/strict_anns/Main.hs
+++ /dev/null
@@ -1,13 +0,0 @@
--- This test checks that constructors with strictness annotations
--- at least parse correctly.  In GHC 2.02 they didn't!
-
-module Main where
- 
-data Foo1 = Crunch1 ! Int ! Int Int deriving( Show )
-
-data Foo2 = Crunch2 ! Int Int Int   deriving( Show )
-
-main = do
-       print (Crunch1 (1+1) (2+2) (3+3))
-       print (Crunch2 (1+1) (2+2) (3+3))
-