lines = S.lines A.write
>>> Stream.fold Fold.toList $ Unicode.lines $ Stream.fromList "lines\nthis\nstring\n\n\n" [fromList "lines",fromList "this",fromList "string",fromList "",fromList ""]
>>> lines f = Stream.foldMany (Fold.takeEndBy_ (== '\n') f)Usage:
>>> Stream.toList $ Unicode.lines Fold.toList (Stream.fromList "line1\nline2\nline3\n\n\n") ["line1","line2","line3","",""]Pre-release
>>> Stream.fold Fold.toList $ Unicode.unlines $ Stream.fromList ["lines", "this", "string"] "lines\nthis\nstring\n"
unlines = S.unlines A.readNote that, in general
unlines . lines /= id
>>> unlines = Stream.unfoldEachEndBy '\n' >>> unlines = Stream.unfoldEachEndBySeq "\n" Unfold.fromListPre-release