X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Ftests%2Fprinting%2Fshould_compile%2FPrint003.stderr;h=cd6f737353b1a21083607ea3b17b1086fbaa5dfc;hb=a18e52014666c9edb9df923adeca1723e2aeeeec;hp=9b25defe79fa8b3c6b570aa4c530dfdda929ec21;hpb=0dfd6d6bac63c0976f4b94243499d678eee30765;p=ghc-hetmet.git

diff --git a/ghc/tests/printing/should_compile/Print003.stderr b/ghc/tests/printing/should_compile/Print003.stderr
index 9b25def..cd6f737 100644
--- a/ghc/tests/printing/should_compile/Print003.stderr
+++ b/ghc/tests/printing/should_compile/Print003.stderr
@@ -1,19 +1,8 @@
 
 ==================== Typechecked ====================
-Word.bitLsh{-r3A-} =
-    _/\_ a_tr3y -> \ x1_B1 ->
-	case x1_B1 of { Word.:Bits{-r3C-} x2_B2 x3_B3  -> x2_B2;}
-Word.bitRsh{-r3z-} =
-    _/\_ a_tr3y -> \ x1_B1 ->
-	case x1_B1 of { Word.:Bits{-r3C-} x2_B2 x3_B3  -> x3_B3;}
-AbsBinds [a_taqz] [d.Bits_aqy] []
+AbsBinds [a{-aSM-}] [_dBits{-aSL-}] []
 
 
 ghc: module version changed to 1; reason: no old .hi file
-_exports_
-Word Bits(:Bits :Bits bitLsh bitRsh);
-_fixities_
-infixl 8 bitLsh;
-infixl 8 bitRsh;
-_declarations_
+__export Word Bits{bitLsh bitRsh};
 1 class Bits a where {bitLsh :: a -> PrelBase.Int -> a; bitRsh :: a -> PrelBase.Int -> a} ;