[project @ 1999-01-23 18:05:12 by sof]

[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 706a4e1..e4a38a3 100644 (file)
--- a/ghc/tests/reader/should_fail/read003.stderr
+++ b/ghc/tests/reader/should_fail/read003.stderr
@@ -12,18 +12,13 @@ module Read003 where
 
 
  
-read003.hs:8:
+read003.hs:4:
     Occurs check: cannot construct the infinite type:
-           aKy = (aKy, aKB, aKE)
-    Expected: (aKy, [aKM], aKE)
-    Inferred: aKy
-    In a pattern binding:
-       ~(a, b, c)
-           | nullity b = a
-           | nullity c = a
-           | otherwise = a
-           where
-               nullity = null
+       t = (t, [a], _116)
+       Expected type: (t, [a], _116)
+       Inferred type: t
+    In the right-hand side of a pattern binding: a
 
 
 Compilation had errors
+