From 0ccda78f87045a3247325c6e8ae9149c3264ba70 Mon Sep 17 00:00:00 2001
From: krasimir <unknown>
Date: Tue, 12 Apr 2005 16:40:16 +0000
Subject: [PATCH] [project @ 2005-04-12 16:40:16 by krasimir] initDynLinker is
 invoked from unload now. This makes safe to call it even
 when then linker is still not initialized.

---
 ghc/compiler/ghci/Linker.lhs |    3 +++
 1 file changed, 3 insertions(+)

diff --git a/ghc/compiler/ghci/Linker.lhs b/ghc/compiler/ghci/Linker.lhs
index 0a18638..c971f91 100644
--- a/ghc/compiler/ghci/Linker.lhs
+++ b/ghc/compiler/ghci/Linker.lhs
@@ -616,6 +616,9 @@ unload :: DynFlags -> [Linkable] -> IO ()
 
 unload dflags linkables
   = block $ do -- block, so we're safe from Ctrl-C in here
+  
+	-- Initialise the linker (if it's not been done already)
+	initDynLinker dflags
 
 	pls	<- readIORef v_PersistentLinkerState
 	new_pls <- unload_wkr dflags linkables pls
-- 
1.7.10.4