diff options
author | tomsmeding <tom.smeding@gmail.com> | 2017-08-26 23:16:00 +0200 |
---|---|---|
committer | tomsmeding <tom.smeding@gmail.com> | 2017-08-26 23:16:15 +0200 |
commit | aa049227c17f15ad22092f1fcab4410bbf3521ba (patch) | |
tree | 7046e62ff530746754e19d07d4e8bc7d7a42ea22 /TypeRules.hs | |
parent | b2c5ef755bc7a2c736c5f52c4753dde66c04c3aa (diff) |
Cleanup and features
debugger, bitwise ops, bounds checking, hex literals,
better typing of some optimisations, makefile fix, exit function.
Diffstat (limited to 'TypeRules.hs')
-rw-r--r-- | TypeRules.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/TypeRules.hs b/TypeRules.hs index a3e7678..2bafe63 100644 --- a/TypeRules.hs +++ b/TypeRules.hs @@ -22,7 +22,7 @@ isIntegralType TChar = True isIntegralType _ = False isSimpleArithBO :: BinaryOp -> Bool -isSimpleArithBO = flip elem [BOAdd, BOSub, BOMul, BODiv, BOMod] +isSimpleArithBO = flip elem [BOAdd, BOSub, BOMul, BODiv, BOMod, BOBitAnd, BOBitOr, BOBitXor] isBoolBO :: BinaryOp -> Bool isBoolBO = flip elem [BOAnd, BOOr] |