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

encodings fix

db4
Daniel Ehrenberg 2008-02-13 19:54:35 -06:00
parent 6ff319cfcb
commit 4103c982c3
3 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1,7 +1,8 @@
! Copyright (C) 2006, 2007 Daniel Ehrenberg. ! Copyright (C) 2006, 2007 Daniel Ehrenberg.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: math kernel sequences sbufs vectors USING: math kernel sequences sbufs vectors io.streams.lines io.streams.plain
namespaces unicode.syntax growable strings io ; namespaces unicode.syntax growable strings io classes io.streams.c
continuations ;
IN: io.encodings IN: io.encodings
TUPLE: encode-error ; TUPLE: encode-error ;

4
core/io/encodings/utf16/utf16.factor
View File

@ -117,14 +117,14 @@ SYMBOL: ignore
TUPLE: utf16le ; TUPLE: utf16le ;
: <utf16le> utf16le construct-delegate ; : <utf16le> utf16le construct-delegate ;
INSTANCE: encoding-stream utf16le INSTANCE: utf16le encoding-stream
M: utf16le encode-string drop encode-utf16le ; M: utf16le encode-string drop encode-utf16le ;
M: utf16le decode-step drop decode-utf16le-step ; M: utf16le decode-step drop decode-utf16le-step ;
TUPLE: utf16be ; TUPLE: utf16be ;
: <utf16be> utf16be construct-delegate ; : <utf16be> utf16be construct-delegate ;
INSTANCE: encoding-stream utf16be INSTANCE: utf16be encoding-stream
M: utf16be encode-string drop encode-utf16be ; M: utf16be encode-string drop encode-utf16be ;
M: utf16le decode-step drop decode-utf16be-step ; M: utf16le decode-step drop decode-utf16be-step ;

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

@ -79,7 +79,7 @@ SYMBOL: quad3
TUPLE: utf8 ; TUPLE: utf8 ;
: <utf8> utf8 construct-delegate ; : <utf8> utf8 construct-delegate ;
INSTANCE: encoding-stream utf8 INSTANCE: utf8 encoding-stream
M: utf8 encode-string drop encode-utf8 ; M: utf8 encode-string drop encode-utf8 ;
M: utf8 decode-step drop decode-utf8-step ; M: utf8 decode-step drop decode-utf8-step ;