Handbook
Glossary
append-nums ( stream byte -- stream char )
Vocabulary
io
.
encodings
.
utf8
.
private
Inputs
stream
an
object
byte
an
object
Outputs
stream
an
object
char
an
object
Definition
USING:
io
io.encodings
kernel
math
;
IN:
io.encodings.utf8.private
:
append-nums
( stream byte -- stream char )
over
stream-read1
dup
starts-2?
[
[
6
shift
]
dip
63
bitand
bitor
]
[
2drop
replacement-char
]
if
;
inline