From 6972bd2187847f291cb34b1e172b80d81bdd4edc Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Thu, 16 Sep 1999 08:40:16 +0000
Subject: [PATCH] [project @ 1999-09-16 08:40:16 by sof] Minor Win32 changes

---
 ghc/driver/ghc.lprl |    6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/ghc/driver/ghc.lprl b/ghc/driver/ghc.lprl
index a2ca7b7..b044ed4 100644
--- a/ghc/driver/ghc.lprl
+++ b/ghc/driver/ghc.lprl
@@ -1140,7 +1140,7 @@ sub setupSyslibs {
   # to implement the itimers, since cygwin.dll does not
   # support it. Only reqd. for `ways' that use itimers.
   #
-  push(@SysLibrary, '-lwinmm')   if $TargetPlatform eq 'i386-unknown-cygwin32';
+  push(@SysLibrary, '-lwinmm')   if ($TargetPlatform =~ /-(mingw32|cygwin32)$/);
    # Note: currently only tested with mingw, may cause conflicts when linking
    #       with libcygwin.a
   push(@SysLibrary, '-lwsock32') if ($TargetPlatform =~ /-(mingw32|cygwin32)$/);
@@ -2007,8 +2007,8 @@ sub prepareWin32DllLink ()
          foreach $a ( @UserLibrary ) {
            $a = "${a}_imp" if ($a =~ /^-lHS/);
          }
-         push(@Link_file, ( $INSTALLING ) ? "$InstLibDirGhc/Main.o"
-			                  : "$TopPwd/$CURRENT_DIR/$GHC_RUNTIME_DIR/Main.o") if $linking_main;
+         push(@Link_file, ( $INSTALLING ) ? "$InstLibDirGhc/Main.dll_o"
+			                  : "$TopPwd/$CURRENT_DIR/$GHC_RUNTIME_DIR/Main.dll_o") if $linking_main;
          push(@Link_file, ( $INSTALLING ) ? "$InstLibDirGhc/PrelMain.o"
 			                  : "$TopPwd/$CURRENT_DIR/$GHC_LIB_DIR/PrelMain.o") if $linking_main;
        }
-- 
1.7.10.4