12df873 · text · git.iko.soy

Fix doco for drop

--HG-- extra : convert_revision : 089770cfc4a7ac50ac6be152dce48221d9cd3c9f

commit12df873d00da016d14bbff36929243016c545eb0 authorBryan O'Sullivan <bos@serpentine.com> dateThu 5 Aug 2010, 17:13 (16 years ago) parent86418cb

3 files changed+6−6

unifiedsplit

Data/Text.hs+2−2

@@ -774,8 +774,8 @@ take n t@(Text arr off len)

774774 #-}

775775

776776-- | /O(n)/ 'drop' @n@, applied to a 'Text', returns the suffix of the

777−-- 'Text' of length @n@, or the empty 'Text' if @n@ is greater than the

778−-- length of the 'Text'. Subject to fusion.

777+-- 'Text' after the first @n@ characters, or the empty 'Text' if @n@

778+-- is greater than the length of the 'Text'. Subject to fusion.

779779drop :: Int -> Text -> Text

780780drop n t@(Text arr off len)

781781 | n <= 0 = t

Data/Text/Fusion/Common.hs+2−2

@@ -662,8 +662,8 @@ take n0 (Stream next0 s0 len) =

662662{-# INLINE [0] take #-}

663663

664664-- | /O(n)/ drop n, applied to a stream, returns the suffix of the

665−-- stream of length @n@, or the empty stream if @n@ is greater than the

666−-- length of the stream.

665+-- stream after the first @n@ characters, or the empty stream if @n@

666+-- is greater than the length of the stream.

667667drop :: Integral a => a -> Stream Char -> Stream Char

668668drop n0 (Stream next0 s0 len) =

669669 Stream next (J n0 :*: s0) (len - fromIntegral (max 0 n0))

Data/Text/Lazy.hs+2−2

@@ -724,8 +724,8 @@ take i t0 = take' i t0

724724 #-}

725725

726726-- | /O(n)/ 'drop' @n@, applied to a 'Text', returns the suffix of the

727−-- 'Text' of length @n@, or the empty 'Text' if @n@ is greater than the

728−-- length of the 'Text'. Subject to fusion.

727+-- 'Text' after the first @n@ characters, or the empty 'Text' if @n@

728+-- is greater than the length of the 'Text'. Subject to fusion.

729729drop :: Int64 -> Text -> Text

730730drop i t0

731731 | i <= 0 = t0