fix for randomIvalInteger, ghc #8898

See https://ghc.haskell.org/trac/ghc/ticket/8898