[project @ 1999-02-17 10:48:06 by sof]

Define __HASKELL98__

diff --git a/ghc/driver/ghc.lprl b/ghc/driver/ghc.lprl
index 99e2f4f..86987b7 100644 (file)
--- a/ghc/driver/ghc.lprl
+++ b/ghc/driver/ghc.lprl
@@ -379,6 +379,7 @@ $Haskell1Version = 5; # i.e., Haskell 1.4
 @HsSourceCppOpts = 
        ( "-D__HASKELL1__=$Haskell1Version"
        , "-D__GLASGOW_HASKELL__=$ProjectVersionInt"
+       , "-D__HASKELL98__"
        # not yet -- SDM
        # , "-D__CONCURRENT_HASKELL__"
        );
@@ -2079,6 +2080,8 @@ sub runGcc {
     local($c_flags) = "@CcBoth_flags";
     local($ddebug_flag) = ( $DEBUGging ) ? '-DDEBUG' : '';
 
+    $c_flags .= "-mno-cygwin" if ( $TargetPlatform =~ /-mingw32$/ );
+
     # "input" files to use that are not in some weird directory;
     # to help C compilers grok .hc files [ToDo: de-hackify]
     local($cc_help)   = "ghc$$.c";