diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2008-07-30 10:52:03 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2008-07-30 10:52:03 +0000 |
| commit | 0f881aa7613f235192a89f90112ac3b47e44bb39 (patch) | |
| tree | 3cdf1ddbde4776c7cb21af358da8226a0c60f0fb /compiler/nativeGen | |
| parent | 4f4dd70fd10ab13e41cb0f541bbfee2330d149da (diff) | |
| download | haskell-0f881aa7613f235192a89f90112ac3b47e44bb39.tar.gz | |
oops, fix a small pessimisation made in previous refactoring
Diffstat (limited to 'compiler/nativeGen')
| -rw-r--r-- | compiler/nativeGen/MachCodeGen.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/nativeGen/MachCodeGen.hs b/compiler/nativeGen/MachCodeGen.hs index c4943107a6..b2f3dffeb3 100644 --- a/compiler/nativeGen/MachCodeGen.hs +++ b/compiler/nativeGen/MachCodeGen.hs @@ -2092,7 +2092,7 @@ is32BitLit (CmmInt i I64) = is32BitInteger i -- assume that labels are in the range 0-2^31-1: this assumes the -- small memory model (see gcc docs, -mcmodel=small). #endif -is32BitLit x = False +is32BitLit x = True #endif is32BitInteger :: Integer -> Bool |