on master help sign in
Fix comments a little

--HG-- extra : convert_revision : 7d9270106038fdd0eddccf4cd5af9c7e5709724d

commite8675b03c932a1ddec6728b7a67f1fedb23d2697 authorBryan O'Sullivan <bos@serpentine.com> dateTue 3 Feb 2009, 22:15 (18 years ago) parentcaca45e
1 file changed+4−5
Data/Text/Fusion.hs+4−5
Data/Text/Fusion.hs+4−5
@@ -587,11 +587,10 @@ unfoldr f s0 = Stream next s0 1
587587 Just (w, s') -> Yield w s'
588588{-# INLINE [0] unfoldr #-}
589589
590−-- | O(n) Like unfoldr, unfoldrN builds a stream from a seed
591−-- value. However, the length of the result should be limited by the
592−-- first argument to unfoldrN. This function is more efficient than
593−-- unfoldr when the maximum length of the result and correct,
594−-- otherwise its complexity performance is similar to 'unfoldr'
590+-- | /O(n)/ Like 'unfoldr', 'unfoldrN' builds a stream from a seed
591+-- value. However, the length of the result is limited by the
592+-- first argument to 'unfoldrN'. This function is more efficient than
593+-- 'unfoldr' when the length of the result is known.
595594unfoldrN :: Int -> (a -> Maybe (Char,a)) -> a -> Stream Char
596595unfoldrN n f s0 = Stream next (0 :!: s0) (n*2)
597596 where