projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Remove platform CPP from nativeGen/PPC/CodeGen.hs
[ghc-hetmet.git]
/
compiler
/
nativeGen
/
PPC
/
Ppr.hs
diff --git
a/compiler/nativeGen/PPC/Ppr.hs
b/compiler/nativeGen/PPC/Ppr.hs
index
eac2d25
..
bd12a81
100644
(file)
--- a/
compiler/nativeGen/PPC/Ppr.hs
+++ b/
compiler/nativeGen/PPC/Ppr.hs
@@
-109,9
+109,7
@@
pprData (CmmStaticLit lit) = pprDataItem lit
pprGloblDecl :: CLabel -> Doc
pprGloblDecl lbl
| not (externallyVisibleCLabel lbl) = empty
pprGloblDecl :: CLabel -> Doc
pprGloblDecl lbl
| not (externallyVisibleCLabel lbl) = empty
- | otherwise = ptext IF_ARCH_sparc((sLit ".global "),
- (sLit ".globl ")) <>
- pprCLabel_asm lbl
+ | otherwise = ptext (sLit ".globl ") <> pprCLabel_asm lbl
pprTypeAndSizeDecl :: CLabel -> Doc
#if linux_TARGET_OS
pprTypeAndSizeDecl :: CLabel -> Doc
#if linux_TARGET_OS