X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftests%2Ftypecheck%2Fshould_succeed%2Ftc063.stderr;fp=ghc%2Fcompiler%2Ftests%2Ftypecheck%2Fshould_succeed%2Ftc063.stderr;h=0000000000000000000000000000000000000000;hb=e3b67289ad773d37576e763704baaca6b83d74db;hp=b2e89fd92b361c67775561f7c230000f9b05721b;hpb=29b46083beaa048af4b4a68e8f96909ac98a639f;p=ghc-hetmet.git diff --git a/ghc/compiler/tests/typecheck/should_succeed/tc063.stderr b/ghc/compiler/tests/typecheck/should_succeed/tc063.stderr deleted file mode 100644 index b2e89fd..0000000 --- a/ghc/compiler/tests/typecheck/should_succeed/tc063.stderr +++ /dev/null @@ -1,75 +0,0 @@ - - ---================================================================================ -Typechecked: -{- nonrec -} -Tag{-r3K,x-}{i} = - _/\_ a{-r3G-} -> \ tpl_B1 -> - Tag{-r3K,x-}{i} - {_@_ a{-r3G-} tpl_B1} -{- nonrec -} -f{-r3I,x-} = - _/\_ r{-r3C-} -> \ tpl_B1 -> - tpl_B1 -{- nonrec -} -AbsBinds -[r{-aHm-}] -[d.Reps_aHf] -[([r{-aHm-}], $mf{-rGx,x-}, f_aHh)] - AbsBinds [] [] [([], f_aHh, f_aHj)] - f_aHj - = GHCerr.noDefaultMethodError{-8k,p-} - (r{-aHm-} -> r{-aHm-} -> r{-aHm-}) "Class Reps Method f" -{- rec -} -AbsBinds [a{-aHn-}] [] [([a{-aHn-}], $d3{-rHq,x-}, d.Eval_aGM)] - d.Eval_aGM = - ({-dict-} [] []) -{- rec -} -AbsBinds [] [] [([], $d1{-rHr,x-}, d.Reps_aGR)] - AbsBinds [] [] [([], f_aHs, f_aGU)] - f_aGU - PrelBase.True{-5E,p-}{i} PrelBase.True{-5E,p-}{i} - = PrelBase.True{-5E,p-}{i} - f_aGU - x_r3o y_r3q - = PrelBase.False{-58,p-}{i} - d.Reps_aGR = - ({-dict-} [] [f_aHs]) -{- rec -} -AbsBinds [q{-aH9-}] [] [([q{-aH9-}], $d2{-rHt,x-}, d.Reps_aH3)] - AbsBinds [] [] [([], f_aHu, f_aH6)] - f_aH6 - x_r3x y_r3z - = y_r3z - d.Reps_aH3 = - ({-dict-} [] [f_aHu]) -{- nonrec -} -{- nonrec -} -AbsBinds [r{-aGB-}] [d.Reps_aGG] [([r{-aGB-}], g{-r3H,x-}, g_aGw)] - f_aHv = - f{-r3I,x-} - r{-aGB-} - d.Reps_aGG - g_aGw - x_r3h = f_aHv x_r3h x_r3h -{- nonrec -} -ghc: module version changed to 1; reason: no old .hi file -_interface_ ShouldSucceed 1 -_instance_modules_ -ArrBase IO PrelNum -_usages_ -PrelBase 1 :: $d37 1 $d39 1 $d41 1 $d46 1 Eval 1; -_exports_ -ShouldSucceed g Reps(f) X(Tag); -_instances_ -instance {Reps PrelBase.Bool} = $d1; -instance _forall_ [a] => {Reps (X a)} = $d2; -instance _forall_ [a] => {PrelBase.Eval (X a)} = $d3; -_declarations_ -1 $d1 _:_ {Reps PrelBase.Bool} ;; -1 $d2 _:_ _forall_ [a] => {Reps (X a)} ;; -1 $d3 _:_ _forall_ [a] => {PrelBase.Eval (X a)} ;; -1 $mf _:_ _forall_ [a] {Reps a} => a -> a -> a ;; -1 class Reps r3C where {f :: r3C -> r3C -> r3C} ; -1 data X r3G = Tag r3G ; -1 g _:_ _forall_ [a] {Reps a} => a -> a ;;