) where
#include "HsVersions.h"
-#include "../includes/ghcconfig.h"
import Constants
import Outputable
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