Rename Data.Array.ByteArray -> Data.Array.Byte

3 files changed, 8 insertions, 8 deletions

diff --git a/libraries/base/Data/Array/ByteArray.hs b/libraries/base/Data/Array/Byte.hs
index 18b0f5b2ec..7d43c03a31 100644
--- a/libraries/base/Data/Array/ByteArray.hs
+++ b/libraries/base/Data/Array/Byte.hs
@@ -1,5 +1,5 @@
 -- |
--- Module      : Data.Array.ByteArray
+-- Module      : Data.Array.Byte
 -- Copyright   : (c) Roman Leshchinskiy 2009-2012
 -- License     : BSD-style
 --
@@ -14,7 +14,7 @@
 {-# LANGUAGE Trustworthy #-}
 {-# LANGUAGE UnboxedTuples #-}
 
-module Data.Array.ByteArray (
+module Data.Array.Byte (
   ByteArray(..)
 ) where
 
@@ -92,12 +92,12 @@ byteArrayFromListN n ys = runST $ do
     marr <- newByteArray n
     let go !ix [] = if ix == n
           then return ()
-          else error $ "Data.Array.ByteArray.byteArrayFromListN: list length less than specified size"
+          else error $ "Data.Array.Byte.byteArrayFromListN: list length less than specified size"
         go !ix (x : xs) = if ix < n
           then do
             writeByteArray marr ix x
             go (ix + 1) xs
-          else error $ "Data.Array.ByteArray.byteArrayFromListN: list length greater than specified size"
+          else error $ "Data.Array.Byte.byteArrayFromListN: list length greater than specified size"
     go 0 ys
     unsafeFreezeByteArray marr
 
@@ -119,7 +119,7 @@ copyByteArray (MutableByteArray dst#) (I# doff#) (ByteArray src#) (I# soff#) (I#
 instance Data ByteArray where
   toConstr _ = error "toConstr"
   gunfold _ _ = error "gunfold"
-  dataTypeOf _ = mkNoRepType "Data.Array.ByteArray.ByteArray"
+  dataTypeOf _ = mkNoRepType "Data.Array.Byte.ByteArray"
 
 instance Show ByteArray where
   showsPrec _ ba =
@@ -228,7 +228,7 @@ instance Semigroup ByteArray where
   stimes i arr
     | itgr < 1 = emptyByteArray
     | itgr <= (fromIntegral (maxBound :: Int)) = replicateByteArray (fromIntegral itgr) arr
-    | otherwise = error "Data.Array.ByteArray#stimes: cannot allocate the requested amount of memory"
+    | otherwise = error "Data.Array.Byte#stimes: cannot allocate the requested amount of memory"
     where itgr = toInteger i :: Integer
 
 instance Monoid ByteArray where
diff --git a/libraries/base/base.cabal b/libraries/base/base.cabal
index 5d9a145421..bb62f89ddd 100644
--- a/libraries/base/base.cabal
+++ b/libraries/base/base.cabal
@@ -113,7 +113,7 @@ Library
         Control.Monad.ST.Strict
         Control.Monad.ST.Unsafe
         Control.Monad.Zip
-        Data.Array.ByteArray
+        Data.Array.Byte
         Data.Bifoldable
         Data.Bifunctor
         Data.Bitraversable
diff --git a/libraries/base/changelog.md b/libraries/base/changelog.md
index 422e8cdd2c..b6273f56de 100644
--- a/libraries/base/changelog.md
+++ b/libraries/base/changelog.md
@@ -12,7 +12,7 @@
   * Introduce `GHC.ExecutablePath.executablePath`, which is more robust than
     `getExecutablePath` in cases when the executable has been deleted.
 
-  * Add `Data.Array.ByteArray` module, providing a boxed `ByteArray#`.
+  * Add `Data.Array.Byte` module, providing a boxed `ByteArray#`.
 
   * `fromEnum` for `Natural` now throws an error for any number that cannot be
     repesented exactly by an `Int` (#20291).