[project @ 1998-04-17 15:58:37 by simonm]

[ghc-hetmet.git] / ghc / tests / typecheck / should_compile / tc031.stderr

diff --git a/ghc/tests/typecheck/should_compile/tc031.stderr b/ghc/tests/typecheck/should_compile/tc031.stderr
index dbbb210..81b8f91 100644 (file)
--- a/ghc/tests/typecheck/should_compile/tc031.stderr
+++ b/ghc/tests/typecheck/should_compile/tc031.stderr
@@ -1,21 +1,13 @@
-
-
-================================================================================
-Typechecked:
-Node{-r3,x-}{i} =
-    \ tpl_B1 tpl_B2 -> Node{-r3,x-}{i} {tpl_B1 tpl_B2}
-AbsBinds [] [] [([], $d1{-rAT,x-}, d.Eval_aAQ)]
-    d.Eval_aAQ = ({-dict-} [] [])
 ghc: module version changed to 1; reason: no old .hi file
-_interface_ ShouldSucceed 1
+_interface_ ShouldSucceed 1 302
 _instance_modules_
-ArrBase IO PrelNum
+IO PrelAddr PrelArr PrelBounded PrelCCall PrelForeign PrelNum
 _usages_
-PrelBase 1 :: $d2 1 $d38 1 $d40 1 $d42 1 $d47 1 Eval 1;
+PrelBase 1 :: $dEval0 1 $dEval2 1 $dEvalBool0 1 $dEvalDouble0 1 $dEvalInt0 1 Eval 1;
 _exports_
 ShouldSucceed Rec(Node);
 _instances_
-instance {PrelBase.Eval Rec} = $d1;
+instance {PrelBase.Eval Rec} = $dEvalRec0;
 _declarations_
-1 $d1 _:_ {PrelBase.Eval Rec} ;;
+1 $dEvalRec0 _:_ {PrelBase.Eval Rec} ;;
 1 data Rec = Node PrelBase.Int Rec ;