io.encodings.utf8: formatting fix

db4
Slava Pestov 2010-08-25 17:47:26 -07:00
parent c32760cc1d
commit 06f4934571
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