[project @ 2004-10-18 02:16:34 by desrt]
authordesrt <unknown>
Mon, 18 Oct 2004 02:16:34 +0000 (02:16 +0000)
committerdesrt <unknown>
Mon, 18 Oct 2004 02:16:34 +0000 (02:16 +0000)
trivial changes to correct a build-breaker that only affects linux/powerpc

ghc/compiler/nativeGen/PositionIndependentCode.hs

index c3b1639..c466b83 100644 (file)
@@ -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