diff --git a/src/System/Random/Internal.hs b/src/System/Random/Internal.hs index cca4a5f6..df52f93e 100644 --- a/src/System/Random/Internal.hs +++ b/src/System/Random/Internal.hs @@ -106,7 +106,7 @@ import Control.Monad.Trans (lift, MonadTrans) import Data.Array.Byte (ByteArray(..), MutableByteArray(..)) import Data.Bits import Data.ByteString.Short.Internal (ShortByteString(SBS)) -import qualified Data.ByteString.Short as SBS (fromShort) +import qualified Data.ByteString.Short.Internal as SBS (fromShort) import Data.IORef (IORef, newIORef) import Data.Int import Data.List (sortOn) diff --git a/src/System/Random/Seed.hs b/src/System/Random/Seed.hs index 89a1aa9b..daceec92 100644 --- a/src/System/Random/Seed.hs +++ b/src/System/Random/Seed.hs @@ -40,7 +40,7 @@ import Control.Monad.State.Strict (get, put, runStateT) import Data.Array.Byte (ByteArray(..)) import Data.Bits import qualified Data.ByteString as BS -import qualified Data.ByteString.Short as SBS (fromShort, toShort) +import qualified Data.ByteString.Short.Internal as SBS (fromShort, toShort) import Data.Coerce import Data.List.NonEmpty as NE (NonEmpty(..), nonEmpty, toList) import Data.Typeable