[project @ 1997-05-26 05:37:13 by sof]
[ghc-hetmet.git] / ghc / compiler / tests / typecheck / should_succeed / tc019.stderr
1
2
3 --================================================================================
4 Typechecked:
5 {- nonrec -}
6 d.Num_aY3 =
7     PrelBase.$d3{-rb6,p-}
8 fromInt_aYg =
9     PrelBase.fromInt{-8R,p-}
10         PrelBase.Int{-3g,p-}
11         d.Num_aY3
12 lit_aYm =
13     fromInt_aYg PrelBase.I#{-5b,p-}{i} 1#
14 fromInt_aYl =
15     fromInt_aYg
16 lit_aYk =
17     fromInt_aYl PrelBase.I#{-5b,p-}{i} 2#
18 d.Num_aY7 =
19     d.Num_aY3
20 +_aYj =
21     PrelBase.+{-r3g,p-}
22         PrelBase.Int{-3g,p-}
23         d.Num_aY7
24 d.Monad_aY9 =
25     PrelBase.$d24{-rb0,p-}
26 >>=_aYi =
27     PrelBase.>>={-811,p-}
28         PrelBase.[]{-3j,p-}
29         d.Monad_aY9
30 d.Monad_aYc =
31     d.Monad_aY9
32 return_aYh =
33     PrelBase.return{-816,p-}
34         PrelBase.[]{-3j,p-}
35         d.Monad_aYc
36 {- nonrec -}
37 AbsBinds
38 []
39 []
40 [([], al{-r3i,x-}, al_aWK), ([], am{-r3h,x-}, am_aWL)]
41     lit_aYn =
42         lit_aYm
43     (al_aWK PrelBase.:{-55,p-}{i} am_aWL)
44         =   [ y_r3e +_aYj lit_aYn |
45                 (y_r3e, z_r3f) <- [(lit_aYm,
46                                     lit_aYk)] ((PrelBase.Int{-3g,p-}, PrelBase.Int{-3g,p-}))
47                 ]
48 {- nonrec -}
49 ghc: module version changed to 1; reason: no old .hi file
50 _interface_ ShouldSucceed 1
51 _instance_modules_
52 ArrBase IO PrelNum
53 _usages_
54 PrelBase 1 :: $d1 1 $d11 1 $d15 1 $d2 1 $d21 1 $d23 1 $d24 1 $d27 1 $d3 1 $d32 1 $d33 1 $d37 1 $d38 1 $d39 1 $d41 1 $d42 1 $d44 1 $d46 1 $d54 1 $d7 1 $d8 1 Eq 1 Eval 1 Monad 1 MonadZero 1 Num 1 Show 1 String 1;
55 PrelNum 1 :: $d10 1 $d16 1 $d18 1 $d29 1 $d33 1 $d35 1;
56 PrelTup 1 :: $d13 1 $d4 1 $d9 1;
57 _exports_
58 ShouldSucceed al am;
59 _declarations_
60 1 al _:_ PrelBase.Int ;;
61 1 am _:_ [PrelBase.Int] ;;