ghc/compiler/tests/deSugar/ds019.stderr

   1 Desugared:
   2 Test.f :: for all d, e, f, g, h, i, j. (d, e, f) -> (g, h) -> i -> [j]
   3 Test.f =
   4     /\ o105 o106 o107 o112 o113 o114 t115 -> \ ds.121 i.122 o.123 ->
   5         let
   6           fail.124 =
   7               (error [t115])
   8                   "\"ds019.hs\", line 8: pattern-matching failure [function binding]\n"S in
   9         let
  10           fail.140 =
  11               let
  12                 fail.135 =
  13                     let
  14                       fail.129 =
  15                           case i.122 of {
  16                             MkTuple2 m.125 n.126 ->
  17                                 let r.127 = o.123 in
  18                                 let h.128 = ds.121 in  Nil! t115
  19                           }
  20                     in
  21                       case ds.121 of {
  22                         MkTuple3 e.130 f.131 g.132 ->
  23                             let q.133 = o.123 in let l.134 = i.122 in  Nil! t115
  24                       }
  25               in
  26                 case i.122 of {
  27                   MkTuple2 j.136 k.137 ->
  28                       let p.138 = o.123 in let d.139 = ds.121 in  Nil! t115
  29                 }
  30         in
  31           case ds.121 of {
  32             MkTuple3 a.141 b.142 c.143 -> Nil! t115
  33           }
  34