X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FsimplCore%2FSimplify.lhs;h=a537e5990a1e8692917439dd531e51994f1298fd;hb=70afe911563dcdc3e5fe4ed79fd944e6f0c64419;hp=3ce54cf8a4229ab3176c25e162950f63acfdfa11;hpb=e44590d93b2ec7d39bea22f2dceb13d000e08c85;p=ghc-hetmet.git

diff --git a/ghc/compiler/simplCore/Simplify.lhs b/ghc/compiler/simplCore/Simplify.lhs
index 3ce54cf..a537e59 100644
--- a/ghc/compiler/simplCore/Simplify.lhs
+++ b/ghc/compiler/simplCore/Simplify.lhs
@@ -24,7 +24,7 @@ import SimplUtils	( mkCase, mkLam, prepareAlts,
 import Id		( Id, idType, idInfo, idArity, isDataConWorkId, 
 			  setIdUnfolding, isDeadBinder,
 			  idNewDemandInfo, setIdInfo, 
-			  setIdOccInfo, zapLamIdInfo, setOneShotLambda, 
+			  setIdOccInfo, zapLamIdInfo, setOneShotLambda
 			)
 import MkId		( eRROR_ID )
 import Literal		( mkStringLit )