From: Ian Lynagh <igloo@earth.li>
Date: Sun, 3 Feb 2008 00:39:29 +0000 (+0000)
Subject: Whitespace
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=5cdd6d82bb1a4c4b90ea2488dcf1fef25c3cc9a4

Whitespace
---

diff --git a/compiler/utils/UniqFM.lhs b/compiler/utils/UniqFM.lhs
index de02227..61c858d 100644
--- a/compiler/utils/UniqFM.lhs
+++ b/compiler/utils/UniqFM.lhs
@@ -204,10 +204,10 @@ First, the DataType itself; which is either a Node, a Leaf, or an Empty.
 data UniqFM ele
   = EmptyUFM
   | LeafUFM FastInt ele
-  | NodeUFM FastInt	    -- the switching
-	    FastInt	    -- the delta
-	    (UniqFM ele)
-	    (UniqFM ele)
+  | NodeUFM FastInt         -- the switching
+            FastInt         -- the delta
+            (UniqFM ele)
+            (UniqFM ele)
 -- INVARIANT: the children of a NodeUFM are never EmptyUFMs
 
 {-