on master help sign in
Merge pull request #56 from staffehn/patch-1
3744768Bryan O'Sullivan
Data/Text/Unsafe.hs+1−1
@@ -51,7 +51,7 @@ unsafeHead (Text arr off _len)
51 n = A.unsafeIndex arr (off+1)
51 n = A.unsafeIndex arr (off+1)
52{-# INLINE unsafeHead #-}
52{-# INLINE unsafeHead #-}
53
53
54−-- | /O(1)/ A variant of 'tail' for non-empty 'Text'. 'unsafeHead'
54+-- | /O(1)/ A variant of 'tail' for non-empty 'Text'. 'unsafeTail'
55-- omits the check for the empty case, so there is an obligation on
55-- omits the check for the empty case, so there is an obligation on
56-- the programmer to provide a proof that the 'Text' is non-empty.
56-- the programmer to provide a proof that the 'Text' is non-empty.
57unsafeTail :: Text -> Text
57unsafeTail :: Text -> Text