From 6bfe1aa048ae13f0a95867773489c5a452f8d28c Mon Sep 17 00:00:00 2001
From: krasimir <unknown>
Date: Fri, 13 May 2005 15:06:13 +0000
Subject: [PATCH] [project @ 2005-05-13 15:06:13 by krasimir] replace
 emptyNodeMap with old_summary_map.

---
 ghc/compiler/main/GHC.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/main/GHC.hs b/ghc/compiler/main/GHC.hs
index bab465a..8f38dd1 100644
--- a/ghc/compiler/main/GHC.hs
+++ b/ghc/compiler/main/GHC.hs
@@ -1217,7 +1217,7 @@ downsweep hsc_env old_summaries excl_mods
 			else do
 		throwDyn (CmdLineError ("can't find file: " ++ file))	
 	getRootSummary (Target (TargetModule modl) maybe_buf)
- 	   = do maybe_summary <- summariseModule hsc_env emptyNodeMap Nothing False 
+ 	   = do maybe_summary <- summariseModule hsc_env old_summary_map Nothing False 
 					   modl maybe_buf excl_mods
 		case maybe_summary of
 		   Nothing -> packageModErr modl
-- 
1.7.10.4