- USING: io.encodings.utf8 tools.test sbufs kernel io io.encodings
- sequences strings arrays unicode.syntax ;
+ USING: io.encodings.utf8 tools.test sbufs kernel io
+ sequences strings arrays unicode ;
: decode-utf8-w/stream ( array -- newarray )
- >sbuf dup reverse-here <utf8> contents >array ;
+ >sbuf dup reverse-here utf8 <decoding> contents ;
: encode-utf8-w/stream ( array -- newarray )
- SBUF" " clone tuck <utf8> write >array ;
+ SBUF" " clone tuck utf8 <encoding> stream-write >array ;
- [ { UNICHAR: replacement-character } ] [ { BIN: 11110101 BIN: 10111111 BIN: 10000000 BIN: 11111111 } decode-utf8-w/stream >array ] unit-test
+ [ { CHAR: replacement-character } ] [ { BIN: 11110101 BIN: 10111111 BIN: 10000000 BIN: 11111111 } decode-utf8-w/stream >array ] unit-test
[ { BIN: 101111111000000111111 } ] [ { BIN: 11110101 BIN: 10111111 BIN: 10000000 BIN: 10111111 } decode-utf8-w/stream >array ] unit-test