f0e476c2405424cc51a1430ee179300162d0a8c5
[ghc-hetmet.git] / ghc / tests / typecheck / should_compile / tc048.stderr
1 ghc: module version changed to 1; reason: no old .hi file
2 _interface_ ShouldSucceed 1
3 _instance_modules_
4 IO PrelAddr PrelArr PrelBounded PrelCCall PrelForeign PrelNum
5 _usages_
6 PrelBase 1 :: $d2 1 $d29 1 $d31 1 $d33 1 $d36 1 $d38 1 Eval 1;
7 PrelTup 1 :: $d13 1;
8 _exports_
9 ShouldSucceed mAp ranAFE ranOAL sNd AFE(MkAFE) FG(MkFG) OL(MkOL);
10 _instances_
11 instance _forall_ [a b c] => {PrelBase.Eval (AFE a b c)} = $d1;
12 instance _forall_ [a b] => {PrelBase.Eval (FG a b)} = $d2;
13 instance _forall_ [a] => {PrelBase.Eval (OL a)} = $d3;
14 _declarations_
15 1 $d1 _:_ _forall_ [a b c] => {PrelBase.Eval (AFE a b c)} ;;
16 1 $d2 _:_ _forall_ [a b] => {PrelBase.Eval (FG a b)} ;;
17 1 $d3 _:_ _forall_ [a] => {PrelBase.Eval (OL a)} ;;
18 1 data AFE n a b = MkAFE (OL (n, FG a b)) ;
19 1 data FG a b = MkFG (OL (a, b)) ;
20 1 data OL a = MkOL [a] ;
21 1 mAp _:_ _forall_ [a b] => (a -> b) -> [a] -> [b] ;;
22 1 ranAFE _:_ _forall_ [a b c] => AFE a b c -> [FG b c] ;;
23 1 ranOAL _:_ _forall_ [a b] => OL (a, b) -> [b] ;;
24 1 sNd _:_ _forall_ [a b] => (a, b) -> b ;;