X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftests%2FdeSugar%2Fds028.stderr;fp=ghc%2Fcompiler%2Ftests%2FdeSugar%2Fds028.stderr;h=0000000000000000000000000000000000000000;hb=29b46083beaa048af4b4a68e8f96909ac98a639f;hp=99e83c83e449186f5a302c8a008622194e5d7247;hpb=3436a37c72644f82471a7d8c684d67438b86cc3a;p=ghc-hetmet.git

diff --git a/ghc/compiler/tests/deSugar/ds028.stderr b/ghc/compiler/tests/deSugar/ds028.stderr
deleted file mode 100644
index 99e83c8..0000000
--- a/ghc/compiler/tests/deSugar/ds028.stderr
+++ /dev/null
@@ -1,83 +0,0 @@
-
-
-================================================================================
-Desugared:
-||||_amR  :: 
-    PrelBase.Bool{-34,p-}
-    -> PrelBase.Bool{-34,p-}
-    -> PrelBase.Bool{-34,p-}
-{-# L #-}
-||||_amR =
-    \ ds_dq6  :: 
-	  PrelBase.Bool{-34,p-}
-      {-# L #-}
-      ds_dq6 ds_dq7  :: 
-		 PrelBase.Bool{-34,p-}
-	     {-# L #-}
-	     ds_dq7 ->
-	case ds_dq6 of {
-	  PrelBase.True{-5E,p-}{i} ->
-	      PrelBase.True{-5E,p-}{i};
-	  PrelBase.False{-58,p-}{i} ->
-	      ds_dq7;
-	}
-||||{-r3q,x-}  :: 
-    PrelBase.Bool{-34,p-}
-    -> PrelBase.Bool{-34,p-}
-    -> PrelBase.Bool{-34,p-}
-{-# L #-}
-||||{-r3q,x-} =
-    ||||_amR
-Rec {
-mAp{-r3r,x-}  :: 
-    _forall_
-    [t{-an5-} t{-an7-}]
-    =>
-    (t{-an5-} -> t{-an7-}) -> [t{-an5-}] -> [t{-an7-}]
-{-# L #-}
-mAp{-r3r,x-} =
-    _/\_ t{-an5-} t{-an7-} ->
-	_letrec_ {
-	  mAp_amZ  :: 
-	      (t{-an5-} -> t{-an7-}) -> [t{-an5-}] -> [t{-an7-}]
-	  {-# L #-}
-	  mAp_amZ =
-	      \ f_r3e  :: 
-		    t{-an5-} -> t{-an7-}
-		{-# L #-}
-		f_r3e ds_dqV  :: 
-			  [t{-an5-}]
-		      {-# L #-}
-		      ds_dqV ->
-		  case ds_dqV of {
-		    PrelBase.[]{-5i,p-}{i} ->
-			PrelBase.[]{-5i,p-}{i}
-			    _@_ t{-an7-};
-		    PrelBase.:{-55,p-}{i} x_r3j xs_r3k ->
-			let {
-			  f_r3h  :: 
-			      t{-an5-} -> t{-an7-}
-			  {-# L #-}
-			  f_r3h =
-			      f_r3e } in
-			let {
-			  ds_drl  :: 
-			      t{-an7-}
-			  {-# L #-}
-			  ds_drl =
-			      f_r3h
-				  x_r3j } in
-			let {
-			  ds_drp  :: 
-			      [t{-an7-}]
-			  {-# L #-}
-			  ds_drp =
-			      mAp_amZ
-				  f_r3h xs_r3k
-			} in 
-			  PrelBase.:{-55,p-}{i}
-			      _@_ t{-an7-} ds_drl ds_drp;
-		  };
-	} in 
-	  mAp_amZ
-end Rec }