Export ‘unsafeIndex’ on short bytestrings (haskell#532)

milloni · Oct 25, 2022 · 2b44c46 · 2b44c46
1 parent 1543e05
commit 2b44c46
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,
@@ -398,6 +399,7 @@ indexMaybe sbs i
 (!?) = indexMaybe
 {-# INLINE (!?) #-}
 
+-- | /O(1)/ Unsafe indexing without bounds checking.
 unsafeIndex :: ShortByteString -> Int -> Word8
 unsafeIndex sbs = indexWord8Array (asBA sbs)