From: desrt <unknown>
Date: Mon, 18 Oct 2004 02:16:34 +0000 (+0000)
Subject: [project @ 2004-10-18 02:16:34 by desrt]
X-Git-Tag: Initial_conversion_from_CVS_complete~1499
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=a4cb3cfba735e82e7cf8225fd67b46a6faefa7b4

[project @ 2004-10-18 02:16:34 by desrt]
trivial changes to correct a build-breaker that only affects linux/powerpc
---

diff --git a/ghc/compiler/nativeGen/PositionIndependentCode.hs b/ghc/compiler/nativeGen/PositionIndependentCode.hs
index c3b1639..c466b83 100644
--- a/ghc/compiler/nativeGen/PositionIndependentCode.hs
+++ b/ghc/compiler/nativeGen/PositionIndependentCode.hs
@@ -55,6 +55,10 @@ import CLabel           ( CLabel, pprCLabel,
                           dynamicLinkerLabelInfo, mkPicBaseLabel,
                           labelDynamic, externallyVisibleCLabel )
 
+#if powerpc_TARGET_ARCH && linux_TARGET_OS
+import CLabel           ( mkForeignLabel )
+#endif
+
 import MachRegs
 import MachInstrs
 import NCGMonad         ( NatM, getNewRegNat, getNewLabelNat )
@@ -391,7 +395,7 @@ pprGotDeclaration = vcat [
     
 pprImportedSymbol importedLbl
     | Just (SymbolPtr, lbl) <- dynamicLinkerLabelInfo importedLbl
-    vcat [
+    = vcat [
         ptext SLIT(".section \".got2\", \"aw\""),
         ptext SLIT(".LC_") <> pprCLabel_asm lbl <> char ':',
         ptext SLIT("\t.long") <+> pprCLabel_asm lbl