maxIntWord :: Word
-- The biggest word representable as an Int
maxIntWord = W# (case maxInt of I# i -> int2Word# i)
maxIntWord :: Word
maxIntWord = W# (case maxInt of I# i -> int2Word# i)
maxIntWord = W# (case maxInt of I# i -> int2Word# i)