Change the last few (F)SLIT's into (f)sLit's

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

diff --git a/compiler/nativeGen/PprMach.hs b/compiler/nativeGen/PprMach.hs
index 5e9ff51..64fa024 100644 (file)
--- a/compiler/nativeGen/PprMach.hs
+++ b/compiler/nativeGen/PprMach.hs
@@ -714,7 +714,7 @@ pprASCII str
        do1 w = ptext (sLit "\t.byte\t") <> int (fromIntegral w)
 
 pprAlign bytes =
-       IF_ARCH_alpha(ptextSLIT(".align ") <> int pow2,
+       IF_ARCH_alpha(ptext (sLit ".align ") <> int pow2,
        IF_ARCH_i386(ptext (sLit ".align ") <> int IF_OS_darwin(pow2,bytes),
        IF_ARCH_x86_64(ptext (sLit ".align ") <> int IF_OS_darwin(pow2,bytes),
        IF_ARCH_sparc(ptext (sLit ".align ") <> int bytes,