blob: 9605b4e121465f7b4f568493918dd4c062c08fd9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
import Data.Word
-- #497: using -O should not make these == 1
main = do
print $ q * 2 + 1
print $ q' * 2 + 1
q :: Word32
q = 0x7FFFFFFF
q' :: Word64
q' = 0x7FFFFFFFFFFFFFFF
|