X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fmain%2FDriverFlags.hs;h=435e50a859ad005b03e7915085493d2e18b4fd3f;hb=fb7a723bfd7650a705cb226e07c5b08b7a8e9279;hp=e9b2a80ae8a1f65e60fdd66d77e03ef6923ef6ab;hpb=1dfaee318171836b32f6b33a14231c69adfdef2f;p=ghc-hetmet.git

diff --git a/ghc/compiler/main/DriverFlags.hs b/ghc/compiler/main/DriverFlags.hs
index e9b2a80..435e50a 100644
--- a/ghc/compiler/main/DriverFlags.hs
+++ b/ghc/compiler/main/DriverFlags.hs
@@ -1,7 +1,7 @@
 {-# OPTIONS -#include "hschooks.h" #-}
 
 -----------------------------------------------------------------------------
--- $Id: DriverFlags.hs,v 1.66 2001/08/17 17:18:52 apt Exp $
+-- $Id: DriverFlags.hs,v 1.68 2001/09/04 18:29:20 ken Exp $
 --
 -- Driver flags
 --
@@ -482,7 +482,10 @@ buildStaticHscOpts = do
 
 machdepCCOpts 
    | prefixMatch "alpha"   cTARGETPLATFORM  
-	= return ( ["-static", "-Xlinker -noprefix_recognition"], [] )
+	= return ( ["-static"], ["-w"] )
+	-- For now, to suppress the gcc warning "call-clobbered
+	-- register used for global register variable", we simply
+	-- disable all warnings altogether using the -w flag. Oh well.
 
    | prefixMatch "hppa"    cTARGETPLATFORM  
         -- ___HPUX_SOURCE, not _HPUX_SOURCE, is #defined if -ansi!
@@ -517,6 +520,12 @@ machdepCCOpts
    | prefixMatch "mips"    cTARGETPLATFORM
 	= return ( ["-static"], [] )
 
+   | prefixMatch "sparc"    cTARGETPLATFORM
+	= return ( [], ["-w"] )
+	-- For now, to suppress the gcc warning "call-clobbered
+	-- register used for global register variable", we simply
+	-- disable all warnings altogether using the -w flag. Oh well.
+
    | prefixMatch "powerpc" cTARGETPLATFORM || prefixMatch "rs6000" cTARGETPLATFORM
 	= return ( ["-static"], ["-finhibit-size-directive"] )