From: simonmar <unknown>
Date: Mon, 10 Dec 2001 14:05:06 +0000 (+0000)
Subject: [project @ 2001-12-10 14:05:06 by simonmar]
X-Git-Tag: Approximately_9120_patches~430
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=a0cb0c4bf8b378bc089f06a3fef2896353f8b491

[project @ 2001-12-10 14:05:06 by simonmar]
Note that the final call to coreBindsSize is still necessary to
eliminate space leakage from the simplifier.
---

diff --git a/ghc/compiler/main/HscMain.lhs b/ghc/compiler/main/HscMain.lhs
index 58c41f7..40edb3c 100644
--- a/ghc/compiler/main/HscMain.lhs
+++ b/ghc/compiler/main/HscMain.lhs
@@ -439,7 +439,9 @@ myCoreToStg dflags this_mod tidy_binds
       () <- coreBindsSize tidy_binds `seq` return ()
       -- TEMP: the above call zaps some space usage allocated by the
       -- simplifier, which for reasons I don't understand, persists
-      -- thoroughout code generation
+      -- thoroughout code generation -- JRS
+      --
+      -- This is still necessary. -- SDM (10 Dec 2001)
 
       stg_binds <- _scc_ "Core2Stg" 
 	     coreToStg dflags tidy_binds