@@ -63,6 +63,11 @@ import qualified Data.Text.Internal.Lazy.Fusion as TLF
6363import qualified Data.Text.Lazy as TL
6464import qualified System.IO as IO
6565
66+#if !MIN_VERSION_base(4,4,0)
67+import Data.Int (Int64)
68+import Data.Word (Word, Word64)
69+#endif
70+
6671instance Random I16 where
6772 randomR = integralRandomR
6873 random = randomR (minBound,maxBound)