[project @ 2004-10-27 15:06:22 by wolfgang]

[ghc-hetmet.git] / ghc / compiler / nativeGen / PositionIndependentCode.hs

diff --git a/ghc/compiler/nativeGen/PositionIndependentCode.hs b/ghc/compiler/nativeGen/PositionIndependentCode.hs
index c466b83..a6a7b27 100644 (file)
--- a/ghc/compiler/nativeGen/PositionIndependentCode.hs
+++ b/ghc/compiler/nativeGen/PositionIndependentCode.hs
@@ -339,6 +339,7 @@ pprImportedSymbol importedLbl
             vcat [
                 ptext SLIT(".section __TEXT,__picsymbolstub1,")
                   <> ptext SLIT("symbol_stubs,pure_instructions,32"),
+                ptext SLIT("\t.align 2"),
                 ptext SLIT("L") <> pprCLabel_asm lbl <> ptext SLIT("$stub:"),
                     ptext SLIT("\t.indirect_symbol") <+> pprCLabel_asm lbl,
                     ptext SLIT("\tmflr r0"),