X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FnativeGen%2FPprMach.hs;fp=compiler%2FnativeGen%2FPprMach.hs;h=8fc9e3dc46bedf0effa6f3b1e02bb93e58eef4bd;hp=c472b5f32dddaffea8b9d993990da96c5396c921;hb=c0ea29afb7fcc3e8a69df60704d170d2c45e3d90;hpb=d95190caa3e09b33bca8544051043954ebd89c73 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