[project @ 2005-01-14 08:01:26 by wolfgang]

[ghc-hetmet.git] / ghc / compiler / main / DriverPipeline.hs

diff --git a/ghc/compiler/main/DriverPipeline.hs b/ghc/compiler/main/DriverPipeline.hs
index 9d8de34..d98dc20 100644 (file)
--- a/ghc/compiler/main/DriverPipeline.hs
+++ b/ghc/compiler/main/DriverPipeline.hs
@@ -1080,8 +1080,7 @@ staticLink dflags o_files dep_packages = do
 
     let extra_os = if static || no_hs_main
                    then []
-                   else [ head (libraryDirs rts_pkg) ++ "/Main.dll_o",
-                          head (libraryDirs base_pkg) ++ "/PrelMain.dll_o" ]
+                   else []
 
     (md_c_flags, _) <- machdepCCOpts dflags
     SysTools.runLink dflags (