Handbook
Glossary
finalize-read-until ( seq sep/f -- seq/f sep/f )
Vocabulary
io.private
Inputs
seq
an
object
sep/f
an
object
Outputs
seq/f
an
object
sep/f
an
object
Definition
USING:
kernel
sequences
;
IN:
io.private
:
finalize-read-until
( seq sep/f -- seq/f sep/f )
2dup
[
empty?
]
[
not
]
bi*
and
[
2drop
f
f
]
when
;
inline