[project @ 1997-09-24 11:08:42 by simonm]

[ghc-hetmet.git] / ghc / tests / deSugar / should_compile / ds007.stderr

diff --git a/ghc/tests/deSugar/should_compile/ds007.stderr b/ghc/tests/deSugar/should_compile/ds007.stderr
index 016812a..e69de29 100644 (file)
--- a/ghc/tests/deSugar/should_compile/ds007.stderr
+++ b/ghc/tests/deSugar/should_compile/ds007.stderr
@@ -1,26 +0,0 @@
-
-
-================================================================================
-Desugared:
-Rec {
-w{-r3f,x-}  ::  _forall_ [takl] => [takl]
-{-# L #-}
-w{-r3f,x-} =
-    _/\_ takl ->
-       _letrec_ {
-         w_ak8  ::  [takl]
-         {-# L #-}
-         w_ak8 =
-             let {
-               y_r3e  ::  _forall_ [takc] => [takc]
-               {-# L #-}
-               y_r3e =
-                   _/\_ takc -> PrelBase.[]{-5i,w-}{i} _@_ takc } in
-             let {
-               a_r3d  ::  _forall_ [takj] => [takj]
-               {-# L #-}
-               a_r3d =
-                   _/\_ takj -> y_r3e _@_ takj
-             } in  a_r3d _@_ takl;
-       } in  w_ak8
-end Rec }