From: sof <unknown>
Date: Wed, 29 Aug 2001 18:12:19 +0000 (+0000)
Subject: [project @ 2001-08-29 18:12:19 by sof]
X-Git-Tag: Approximately_9120_patches~1048
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=e9c95834686f00fdff2f0f22a03be234e5f7fe12;p=ghc-hetmet.git

[project @ 2001-08-29 18:12:19 by sof]
emptyPLS: warning removal
---

diff --git a/ghc/compiler/compMan/CmLink.lhs b/ghc/compiler/compMan/CmLink.lhs
index b99c5ff..c7ac67e 100644
--- a/ghc/compiler/compMan/CmLink.lhs
+++ b/ghc/compiler/compMan/CmLink.lhs
@@ -82,7 +82,7 @@ emptyPLS = return (PersistentLinkerState { closure_env = emptyFM,
                                            itbl_env    = emptyFM,
 					   bcos_loaded = [] })
 #else
-emptyPLS = return (PersistentLinkerState {})
+emptyPLS = return (PersistentLinkerState {dummy=()})
 #endif
 
 -- We also keep track of which object modules are currently loaded