[project @ 1997-05-26 05:42:53 by sof]

[ghc-hetmet.git] / ghc / compiler / tests / typecheck / should_fail / tcfail004.stderr

diff --git a/ghc/compiler/tests/typecheck/should_fail/tcfail004.stderr b/ghc/compiler/tests/typecheck/should_fail/tcfail004.stderr
index 6272111..b5ea751 100644 (file)
--- a/ghc/compiler/tests/typecheck/should_fail/tcfail004.stderr
+++ b/ghc/compiler/tests/typecheck/should_fail/tcfail004.stderr
@@ -1,8 +1,11 @@
  
-"tcfail004.hs", line 3:
-    Couldn't match type "(ot0, ot1)" against "(tt6, tt8, tt10)".
+tcfail004.hs:3: Couldn't match the type
+                   `PrelTup.(,)' against `PrelTup.(,,) t{-aXz-}'
+    Expected: `(t{-aXt-}, t{-aXw-})'
+    Inferred: `(t{-aXz-}, t{-aXC-}, t{-aXF-})'
     In a pattern binding:
-       (f, g) = (1, 2, 3)
-Fail: Compilation errors found
+       (`f', `g')
+           =   `(1, 2, 3)'
 
-ghc: execution of the Haskell compiler had trouble
+
+Compilation had errors