From: simonpj@microsoft.com <unknown>
Date: Fri, 4 Aug 2006 08:24:03 +0000 (+0000)
Subject: Comments only
X-Git-Tag: After_FC_branch_merge~178
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=0119bfdc7ae348c0f45b591391d1b68bc6bd8cc8

Comments only
---

diff --git a/compiler/basicTypes/MkId.lhs b/compiler/basicTypes/MkId.lhs
index 0c430da..8f71aab 100644
--- a/compiler/basicTypes/MkId.lhs
+++ b/compiler/basicTypes/MkId.lhs
@@ -571,10 +571,10 @@ mkRecordSelId tycon field_label
 -- it manipulates CoreSyn.
 
 mkReboxingAlt
-  :: [Unique]			-- Uniques for the new Ids
+  :: [Unique]		-- Uniques for the new Ids
   -> DataCon
-  -> [Var]			-- Source-level args, including existential dicts
-  -> CoreExpr			-- RHS
+  -> [Var]		-- Source-level args, including existential dicts
+  -> CoreExpr		-- RHS
   -> CoreAlt
 
 mkReboxingAlt us con args rhs