From: Ben.Lippmeier@anu.edu.au <unknown>
Date: Thu, 22 Jan 2009 22:51:50 +0000 (+0000)
Subject: SPARC NCG: Use .skip instead of .space in assembler
X-Git-Tag: 2009-03-13~137
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=c0ea29afb7fcc3e8a69df60704d170d2c45e3d90

SPARC NCG: Use .skip instead of .space in assembler

 - In the GNU assembler they mean the same thing
 - The Solaris assembler only has .skip
---

diff --git a/compiler/nativeGen/PprMach.hs b/compiler/nativeGen/PprMach.hs
index c472b5f..8fc9e3d 100644
--- a/compiler/nativeGen/PprMach.hs
+++ b/compiler/nativeGen/PprMach.hs
@@ -692,7 +692,7 @@ pprData :: CmmStatic -> Doc
 pprData (CmmAlign bytes)         = pprAlign bytes
 pprData (CmmDataLabel lbl)       = pprLabel lbl
 pprData (CmmString str)          = pprASCII str
-pprData (CmmUninitialised bytes) = ptext (sLit ".space ") <> int bytes
+pprData (CmmUninitialised bytes) = ptext (sLit ".skip ") <> int bytes
 pprData (CmmStaticLit lit)       = pprDataItem lit
 
 pprGloblDecl :: CLabel -> Doc