steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
core/io/encodings/utf8/utf8.factor
View File

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