diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -1,5 +1,9 @@
 [![Build Status](https://travis-ci.org/larskuhtz/random-bytestring.svg)](https://travis-ci.org/larskuhtz/random-bytestring)
 
+**This package is deprecated**. Please, use
+[`genByteString`](https://hackage.haskell.org/package/random-1.2.0/docs/System-Random.html#v:genByteString) from the [random
+package (version >=1.2)](https://hackage.haskell.org/package/random) instead.
+
 # Efficient Random Haskell ByteStrings
 
 ## Installation
diff --git a/random-bytestring.cabal b/random-bytestring.cabal
--- a/random-bytestring.cabal
+++ b/random-bytestring.cabal
@@ -1,7 +1,11 @@
 Name: random-bytestring
-Version: 0.1.3.2
+Version: 0.1.4
 Synopsis: Efficient generation of random bytestrings
 Description:
+    __This package is deprecated__. Please, use
+    'genByteString' from the [random
+    package (version >=1.2)](https://hackage.haskell.org/package/random) instead.
+    .
     Efficient generation of random bytestrings. The implementation
     populates uninitialized memory with uniformily distributed random
     64 bit words (and 8 bit words for remaining bytes at the end of
@@ -26,7 +30,7 @@
 License: MIT
 Author: Lars Kuhtz <lakuhtz@gmail.com>
 Maintainer: Lars Kuhtz <lakuhtz@gmail.com>
-Copyright: Copyright (c) 2017-2019 Lars Kuhtz <lakuhtz@gmail.com>
+Copyright: Copyright (c) 2017-2021 Lars Kuhtz <lakuhtz@gmail.com>
 Category: System
 Build-type: Simple
 Cabal-version: 1.18
@@ -37,6 +41,9 @@
     GHC == 8.2.2
     GHC == 8.4.1
     GHC == 8.6.5
+    GHC == 8.8.4
+    GHC == 8.10.3
+    GHC == 9.0.1
 License-file: LICENSE
 
 extra-doc-files:
diff --git a/src/Data/ByteString/Random/Internal.hs b/src/Data/ByteString/Random/Internal.hs
--- a/src/Data/ByteString/Random/Internal.hs
+++ b/src/Data/ByteString/Random/Internal.hs
@@ -74,7 +74,7 @@
             | curPtr < fin64Ptr = {-# SCC "loop64" #-} do
                 !b ← uniformW64 g
                 {-# SCC "poke64" #-} poke curPtr b
-                loop64 $ {-# SCC "ptr_inc" #-} curPtr `plusPtr` 8
+                loop64 $ curPtr `plusPtr` 8
             | otherwise = loop8 $ castPtr curPtr
 
         -- Generate 8bit values