ghc/compiler/tests/deSugar/ds006.stderr

   1
   2
   3 ================================================================================
   4 Desugared:
   5 Rec {
   6 d.Num_aHu  ::
   7     {PrelBase.Num{-2c,p-} PrelBase.Int{-3g,p-}}
   8 {-# L #-}
   9 d.Num_aHu =
  10     PrelBase.$d3{-rb1,p-}
  11 +_aJy  ::
  12     PrelBase.Int{-3g,p-}
  13     -> PrelBase.Int{-3g,p-}
  14     -> PrelBase.Int{-3g,p-}
  15 {-# L #-}
  16 +_aJy =
  17     PrelBase.+{-ras,p-}
  18         _@_ PrelBase.Int{-3g,p-} d.Num_aHu
  19 d.Num_aHy  ::
  20     {PrelBase.Num{-2c,p-} PrelBase.Int{-3g,p-}}
  21 {-# L #-}
  22 d.Num_aHy =
  23     d.Num_aHu
  24 fromInt_aJG  ::
  25     PrelBase.Int{-3g,p-} -> PrelBase.Int{-3g,p-}
  26 {-# L #-}
  27 fromInt_aJG =
  28     PrelBase.fromInt{-8R,p-}
  29         _@_ PrelBase.Int{-3g,p-} d.Num_aHy
  30 lit_aJF  ::
  31     PrelBase.Int{-3g,p-}
  32 {-# L #-}
  33 lit_aJF =
  34     let {
  35       ds_dKi  ::
  36           PrelBase.Int{-3g,p-}
  37       {-# L #-}
  38       ds_dKi =
  39           PrelBase.I#{-5b,p-}{i}
  40               1
  41     } in
  42       fromInt_aJG
  43           ds_dKi
  44 v_aHa  ::
  45     PrelBase.Int{-3g,p-}
  46 {-# L #-}
  47 v_aHa =
  48     +_aJy
  49         v_aHa lit_aJF
  50 v{-r1,x-}  ::
  51     PrelBase.Int{-3g,p-}
  52 {-# L #-}
  53 v{-r1,x-} =
  54     v_aHa
  55 end Rec }