Export ‘unsafeIndex’ on short bytestrings (#532)

(cherry picked from commit a729850)
haskell · Jul 25, 2022 · d47a424 · d47a424
1 parent e6a8b19
commit d47a424
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/Data/ByteString/Short/Internal.hs b/Data/ByteString/Short/Internal.hs
@@ -138,6 +138,7 @@ module Data.ByteString.Short.Internal (
     count,
     findIndex,
     findIndices,
+    unsafeIndex,
 
     -- * Low level operations
     createFromPtr,
@@ -394,6 +395,7 @@ indexMaybe sbs i
 (!?) = indexMaybe
 {-# INLINE (!?) #-}
 
+-- | /O(1)/ Unsafe indexing without bounds checking.
 unsafeIndex :: ShortByteString -> Int -> Word8
 unsafeIndex sbs = indexWord8Array (asBA sbs)