diff options
| author | simonmar <unknown> | 2004-08-26 11:06:04 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2004-08-26 11:06:04 +0000 |
| commit | 793fb3bb7838467c091d00eb8f48497fa641f51b (patch) | |
| tree | 644c57fd3d3d62afb1591aa93a83205713dd644f /ghc/compiler/cmm | |
| parent | 4ec24c11f1ec4b2d92b9c32947cddde01660242e (diff) | |
| download | haskell-793fb3bb7838467c091d00eb8f48497fa641f51b.tar.gz | |
[project @ 2004-08-26 11:06:04 by simonmar]
Urk, since when has subtraction been associative. /me dons the pointy
hat.
Diffstat (limited to 'ghc/compiler/cmm')
| -rw-r--r-- | ghc/compiler/cmm/MachOp.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/ghc/compiler/cmm/MachOp.hs b/ghc/compiler/cmm/MachOp.hs index 2d933e083e..dcf9bb6fc5 100644 --- a/ghc/compiler/cmm/MachOp.hs +++ b/ghc/compiler/cmm/MachOp.hs @@ -506,7 +506,6 @@ isAssociativeMachOp :: MachOp -> Bool isAssociativeMachOp mop = case mop of MO_Add r -> not (isFloatingRep r) - MO_Sub r -> not (isFloatingRep r) MO_Mul r -> not (isFloatingRep r) MO_And _ -> True MO_Or _ -> True |