io.streams.sequence: use stream-exempler here.

db4
John Benediktsson 2015-06-09 20:24:42 -07:00
parent 95c34c41b7
commit 1dab2ae6ca
1 changed files with 1 additions and 1 deletions

View File

@ -61,7 +61,7 @@ PRIVATE>
[ find-separator ] keep
[ [ (sequence-read-unsafe) ] (read-into-new) ]
[ [ 1 + ] change-i drop ]
[ stream-element-type +byte+ eq? B{ } "" ? or ] tri swap ; inline
[ stream-exemplar or ] tri swap ; inline
PRIVATE>