[project @ 2000-05-16 14:03:14 by rrt]

[ghc-hetmet.git] / ghc / tests / reader / should_fail / read003.stderr

diff --git a/ghc/tests/reader/should_fail/read003.stderr b/ghc/tests/reader/should_fail/read003.stderr
index 7b24e35..c2219e6 100644 (file)
--- a/ghc/tests/reader/should_fail/read003.stderr
+++ b/ghc/tests/reader/should_fail/read003.stderr
@@ -1,15 +1,4 @@
 
-==================== Parser ====================
-module Read003 where
-~(a, b, c)
-    | nullity b = a
-    | nullity c = a
-    | otherwise = a
-    where
-       nullity = null
-
-
-
 read003.hs:4:
     Occurs check: cannot construct the infinite type: t = (t, [a], t1)
        Expected type: (t, [a], t1)