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

Fixing Unicode collation tests

db4
Daniel Ehrenberg 2008-05-25 21:36:38 -05:00
parent 353d4e2ab0
commit 2b7ca515cc
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/unicode/collation/collation-tests.factor
View File

@ -1,6 +1,6 @@
USING: io io.files splitting unicode.collation sequences kernel USING: io io.files splitting unicode.collation sequences kernel
io.encodings.utf8 math.parser math.order tools.test assocs io.encodings.utf8 math.parser math.order tools.test assocs
io.streams.null ; io.streams.null words combinators.lib ;
IN: unicode.collation.tests IN: unicode.collation.tests
: parse-test ( -- strings ) : parse-test ( -- strings )

2
extra/unicode/script/script.factor
View File

@ -10,7 +10,7 @@ SYMBOL: interned
: parse-script ( stream -- assoc ) : parse-script ( stream -- assoc )
! assoc is code point/range => name ! assoc is code point/range => name
lines filter-comments [ split-; ] map >hashtable ; lines filter-comments [ split-; ] map ;
: range, ( value key -- ) : range, ( value key -- )
swap interned get swap interned get