io.encodings.utf8: formatting fix

Slava Pestov 2010-08-25 17:47:26 -07:00
parent a5125844b0
commit 12e182acea
1 changed files with 3 additions and 2 deletions

View File

@ -20,9 +20,10 @@ SINGLETON: utf8
[ 2drop replacement-char ] if ; inline
: minimum-code-point ( char minimum -- char )
over > [ drop replacement-char ] when ; inline
over > [ drop replacement-char ] when ; inline
: maximum-code-point ( char maximum -- char )
over < [ drop replacement-char ] when ; inline
over < [ drop replacement-char ] when ; inline
: double ( stream byte -- stream char )
BIN: 11111 bitand append-nums