From caf23cc69ad53481e8357b3cf0e37fdea3d0e05a Mon Sep 17 00:00:00 2001 From: "Ben.Lippmeier@anu.edu.au" Date: Sun, 15 Feb 2009 07:32:34 +0000 Subject: [PATCH] NCG: validate fixes for i386-darwin --- compiler/nativeGen/X86/Ppr.hs | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/compiler/nativeGen/X86/Ppr.hs b/compiler/nativeGen/X86/Ppr.hs index bdbeebd..4881062 100644 --- a/compiler/nativeGen/X86/Ppr.hs +++ b/compiler/nativeGen/X86/Ppr.hs @@ -43,7 +43,9 @@ import Outputable (panic, Outputable) import Data.Word - +#if i386_TARGET_ARCH && darwin_TARGET_OS +import Data.Bits +#endif -- ----------------------------------------------------------------------------- -- Printing this stuff out @@ -96,7 +98,13 @@ pprData :: CmmStatic -> Doc pprData (CmmAlign bytes) = pprAlign bytes pprData (CmmDataLabel lbl) = pprLabel lbl pprData (CmmString str) = pprASCII str + +#if darwin_TARGET_OS +pprData (CmmUninitialised bytes) = ptext (sLit ".space ") <> int bytes +#else pprData (CmmUninitialised bytes) = ptext (sLit ".skip ") <> int bytes +#endif + pprData (CmmStaticLit lit) = pprDataItem lit pprGloblDecl :: CLabel -> Doc -- 1.7.10.4