2 ==================== Typechecked ====================
4 _/\_ a_tr3y -> \ x1_B1 ->
5 case x1_B1 of { Word.:Bits{-r3C-} x2_B2 x3_B3 -> x2_B2;}
7 _/\_ a_tr3y -> \ x1_B1 ->
8 case x1_B1 of { Word.:Bits{-r3C-} x2_B2 x3_B3 -> x3_B3;}
9 AbsBinds [a_taqh] [d.Bits_aqg] []
12 ghc: module version changed to 1; reason: no old .hi file
13 _interface_ Word 1 302
15 IO PrelAddr PrelArr PrelBounded PrelCCall PrelForeign PrelNum
17 Word Bits(:Bits :Bits bitLsh bitRsh);
22 1 class Bits a where {bitLsh :: a -> PrelBase.Int -> a; bitRsh :: a -> PrelBase.Int -> a} ;