From a0cb0c4bf8b378bc089f06a3fef2896353f8b491 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Mon, 10 Dec 2001 14:05:06 +0000
Subject: [PATCH] [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.

---
 ghc/compiler/main/HscMain.lhs |    4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

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
-- 
1.7.10.4