diff options
| author | Ian Lynagh <igloo@earth.li> | 2008-07-23 19:19:48 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2008-07-23 19:19:48 +0000 |
| commit | 497d3a963f679681db098588bcab00121687c8ed (patch) | |
| tree | 0feff7917d2e58eefc1529bdff5f9130c76a2e0a /compiler/nativeGen | |
| parent | c0909f1e26589478f44650e16cbf8c0ffdbf2112 (diff) | |
| download | haskell-497d3a963f679681db098588bcab00121687c8ed.tar.gz | |
Fix a build error on powerpc/Linux; spotted by Jeroen Pulles
Diffstat (limited to 'compiler/nativeGen')
| -rw-r--r-- | compiler/nativeGen/PprMach.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/nativeGen/PprMach.hs b/compiler/nativeGen/PprMach.hs index b77f75461f..694e487058 100644 --- a/compiler/nativeGen/PprMach.hs +++ b/compiler/nativeGen/PprMach.hs @@ -349,7 +349,7 @@ pprReg IF_ARCH_i386(s,) IF_ARCH_x86_64(s,) r ppr_reg_no :: Int -> Doc ppr_reg_no i | i <= 31 = int i -- GPRs | i <= 63 = int (i-32) -- FPRs - | otherwise = ptext sLit "very naughty powerpc register" + | otherwise = ptext (sLit "very naughty powerpc register") #endif #endif |