X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FdeSugar%2FDsUtils.lhs;fp=ghc%2Fcompiler%2FdeSugar%2FDsUtils.lhs;h=11aa01b8c81d0e23a45af71ff6cda4ab6d246275;hb=853e20a3eb86137cdb8accf69c6caa9db83a3d34;hp=671697b2591e4e6e840901627efa8f9a1194bb10;hpb=ca739e852566d7e0bfd594e6d7bf08da04f78d3c;p=ghc-hetmet.git

diff --git a/ghc/compiler/deSugar/DsUtils.lhs b/ghc/compiler/deSugar/DsUtils.lhs
index 671697b..11aa01b 100644
--- a/ghc/compiler/deSugar/DsUtils.lhs
+++ b/ghc/compiler/deSugar/DsUtils.lhs
@@ -325,13 +325,13 @@ mkCoAlgCaseMatchResult var ty match_alts
 
 	-- Stuff for parallel arrays
 	-- 
-	-- * the following is to desugar cases over fake constructors for
+	--  * the following is to desugar cases over fake constructors for
 	--   parallel arrays, which are introduced by `tidy1' in the `PArrPat'
 	--   case
 	--
 	-- Concerning `isPArrFakeAlts':
 	--
-	-- * it is *not* sufficient to just check the type of the type
+	--  * it is *not* sufficient to just check the type of the type
 	--   constructor, as we have to be careful not to confuse the real
 	--   representation of parallel arrays with the fake constructors;
 	--   moreover, a list of alternatives must not mix fake and real