io.encodings.iso2022: stop using sets:unique.

locals-and-roots
John Benediktsson 2016-04-18 21:10:17 -07:00
parent c3a9c96edb
commit 9439c5a684
1 changed files with 4 additions and 4 deletions

View File

@ -1,8 +1,8 @@
! Copyright (C) 2009 Daniel Ehrenberg
! See http://factorcode.org/license.txt for BSD license.
USING: io.encodings kernel sequences io simple-flat-file sets math
combinators.short-circuit io.binary arrays assocs namespaces
locals accessors combinators biassocs byte-arrays parser literals ;
USING: accessors assocs biassocs byte-arrays combinators
combinators.short-circuit io io.binary io.encodings kernel
literals locals math namespaces sequences simple-flat-file ;
IN: io.encodings.iso2022
SINGLETON: iso2022
@ -18,7 +18,7 @@ SYMBOL: jis212
"vocab:io/encodings/iso2022/212.txt" flat-file>biassoc jis212 set-global
SYMBOL: ascii
128 iota unique >biassoc ascii set-global
128 iota dup zip >biassoc ascii set-global
TUPLE: iso2022-state type ;