-- ---------------------------------------------------------------------------
-- Utils

wordShift :: DynFlags -> Int
wordShift dflags = widthInLog (wordWidth dflags)
wordShift :: DynFlags -> Int
wordShift dflags = widthInLog (wordWidth dflags)
wordShift dflags = widthInLog (wordWidth dflags)