X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Ftests%2Ftypecheck%2Fshould_compile%2Ftc050.stderr;h=033ba556e7df5579f236adbf128508d630d7c43d;hb=7c200a0fc54a76e623ec933fbe53d09b34ab3c75;hp=43a7fd395b1f274a4acc5c23c393881ac15d69b4;hpb=cd10502b37dc716d9fbb28743989dd235322b0af;p=ghc-hetmet.git diff --git a/ghc/tests/typecheck/should_compile/tc050.stderr b/ghc/tests/typecheck/should_compile/tc050.stderr index 43a7fd3..033ba55 100644 --- a/ghc/tests/typecheck/should_compile/tc050.stderr +++ b/ghc/tests/typecheck/should_compile/tc050.stderr @@ -1,9 +1,9 @@ ghc: module version changed to 1; reason: no old .hi file -__export ShouldSucceed f g Foo{o_and}; -instance {Foo PrelBase.Bool} = _fFooBool; -instance {Foo PrelBase.Int} = _fFooInt; -1 _fFooBool :: {Foo PrelBase.Bool} ; -1 _fFooInt :: {Foo PrelBase.Int} ; +__export ShouldSucceed Foo{o_and} f g; +instance {Foo PrelBase.Bool} = zdfFooBool; +instance {Foo PrelBase.Int} = zdfFooInt; 1 class Foo a where {o_and :: a -> a -> a} ; 1 f :: __forall [t] => PrelBase.Bool -> t -> PrelBase.Bool ; 1 g :: __forall [t a] {PrelBase.Num a, Foo a} => a -> t -> a ; +1 zdfFooBool :: {Foo PrelBase.Bool} ; +1 zdfFooInt :: {Foo PrelBase.Int} ;