X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftests%2FdeSugar%2Fds006.stderr;fp=ghc%2Fcompiler%2Ftests%2FdeSugar%2Fds006.stderr;h=0000000000000000000000000000000000000000;hb=29b46083beaa048af4b4a68e8f96909ac98a639f;hp=c6358f3470951c47867353dbc3153380c027a58e;hpb=3436a37c72644f82471a7d8c684d67438b86cc3a;p=ghc-hetmet.git diff --git a/ghc/compiler/tests/deSugar/ds006.stderr b/ghc/compiler/tests/deSugar/ds006.stderr deleted file mode 100644 index c6358f3..0000000 --- a/ghc/compiler/tests/deSugar/ds006.stderr +++ /dev/null @@ -1,55 +0,0 @@ - - -================================================================================ -Desugared: -Rec { -d.Num_aHu :: - {PrelBase.Num{-2c,p-} PrelBase.Int{-3g,p-}} -{-# L #-} -d.Num_aHu = - PrelBase.$d3{-rb1,p-} -+_aJy :: - PrelBase.Int{-3g,p-} - -> PrelBase.Int{-3g,p-} - -> PrelBase.Int{-3g,p-} -{-# L #-} -+_aJy = - PrelBase.+{-ras,p-} - _@_ PrelBase.Int{-3g,p-} d.Num_aHu -d.Num_aHy :: - {PrelBase.Num{-2c,p-} PrelBase.Int{-3g,p-}} -{-# L #-} -d.Num_aHy = - d.Num_aHu -fromInt_aJG :: - PrelBase.Int{-3g,p-} -> PrelBase.Int{-3g,p-} -{-# L #-} -fromInt_aJG = - PrelBase.fromInt{-8R,p-} - _@_ PrelBase.Int{-3g,p-} d.Num_aHy -lit_aJF :: - PrelBase.Int{-3g,p-} -{-# L #-} -lit_aJF = - let { - ds_dKi :: - PrelBase.Int{-3g,p-} - {-# L #-} - ds_dKi = - PrelBase.I#{-5b,p-}{i} - 1 - } in - fromInt_aJG - ds_dKi -v_aHa :: - PrelBase.Int{-3g,p-} -{-# L #-} -v_aHa = - +_aJy - v_aHa lit_aJF -v{-r1,x-} :: - PrelBase.Int{-3g,p-} -{-# L #-} -v{-r1,x-} = - v_aHa -end Rec }