From cbfde9c5824d107ab9bec73ce0e31ca81c3f167f Mon Sep 17 00:00:00 2001
From: rrt <unknown>
Date: Thu, 10 Aug 2000 10:20:03 +0000
Subject: [PATCH] [project @ 2000-08-10 10:20:03 by rrt] Reinstated
 isLocallyDefinedName test in isDllName, because nameModule
 can't cope with local names.

---
 ghc/compiler/basicTypes/Name.lhs |    2 ++
 1 file changed, 2 insertions(+)

diff --git a/ghc/compiler/basicTypes/Name.lhs b/ghc/compiler/basicTypes/Name.lhs
index 23c3a01..d066626 100644
--- a/ghc/compiler/basicTypes/Name.lhs
+++ b/ghc/compiler/basicTypes/Name.lhs
@@ -455,6 +455,8 @@ maybeUserImportedFrom other			           		   = Nothing
 isDllName :: Name -> Bool
 	-- Does this name refer to something in a different DLL?
 isDllName nm = not opt_Static &&
+	       not (isLocallyDefinedName nm) && 
+-- isLocallyDefinedName test is needed because nameModule won't work on local names
 	       not (isLocalModule (nameModule nm))
 
 nameSrcLoc name = provSrcLoc (n_prov name)
-- 
1.7.10.4