From 54874801265a5ce38e9fd6b193113ba4bb7b5694 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Tue, 5 Mar 2013 10:34:47 -0800 Subject: [PATCH] core: cleanup USING lists. --- core/alien/strings/strings.factor | 8 ++++---- core/bootstrap/layouts/layouts.factor | 6 ++---- core/byte-arrays/byte-arrays.factor | 4 ++-- core/byte-vectors/byte-vectors.factor | 4 ++-- core/checksums/crc32/crc32.factor | 5 ++--- core/destructors/destructors.factor | 4 ++-- core/effects/effects.factor | 5 ++--- core/graphs/graphs.factor | 2 +- core/growable/growable.factor | 4 ++-- core/hash-sets/hash-sets.factor | 5 ++--- core/hashtables/hashtables.factor | 4 ++-- core/init/init.factor | 4 ++-- core/io/backend/backend.factor | 4 ++-- core/io/files/files.factor | 6 +++--- core/io/io.factor | 4 ++-- core/io/streams/byte-array/byte-array.factor | 4 ++-- core/io/streams/c/c.factor | 7 +++---- core/io/streams/memory/memory.factor | 2 +- core/io/streams/plain/plain.factor | 2 +- core/io/streams/sequence/sequence.factor | 5 +++-- core/layouts/layouts.factor | 3 +-- core/lexer/lexer.factor | 6 +++--- core/math/integers/integers.factor | 4 ++-- core/parser/parser.factor | 11 +++++------ core/quotations/quotations.factor | 5 ++--- core/sbufs/sbufs.factor | 4 ++-- core/sorting/sorting.factor | 4 ++-- core/source-files/errors/errors.factor | 4 ++-- core/source-files/source-files.factor | 9 ++++----- core/splitting/splitting.factor | 2 +- core/strings/parser/parser.factor | 3 +-- core/strings/strings.factor | 5 +++-- core/syntax/syntax.factor | 20 ++++++++++---------- core/vectors/vectors.factor | 4 ++-- core/vocabs/parser/parser.factor | 7 +++---- core/vocabs/vocabs.factor | 2 +- core/words/alias/alias.factor | 5 +++-- core/words/constant/constant.factor | 2 +- core/words/symbol/symbol.factor | 2 +- core/words/words.factor | 7 +++---- 40 files changed, 94 insertions(+), 104 deletions(-) diff --git a/core/alien/strings/strings.factor b/core/alien/strings/strings.factor index 8594cf2f9b..346ad45673 100644 --- a/core/alien/strings/strings.factor +++ b/core/alien/strings/strings.factor @@ -1,9 +1,9 @@ ! Copyright (C) 2008, 2011 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: arrays sequences kernel kernel.private accessors math -alien.accessors byte-arrays io io.encodings io.encodings.utf8 -io.encodings.utf16n io.streams.byte-array io.streams.memory system -system.private alien strings combinators namespaces init ; +USING: accessors alien arrays byte-arrays init io io.encodings +io.encodings.utf16n io.encodings.utf8 io.streams.byte-array +io.streams.memory kernel kernel.private namespaces sequences +strings system system.private ; IN: alien.strings GENERIC# alien>string 1 ( c-ptr encoding -- string/f ) diff --git a/core/bootstrap/layouts/layouts.factor b/core/bootstrap/layouts/layouts.factor index e139faa505..7ac8a8590d 100644 --- a/core/bootstrap/layouts/layouts.factor +++ b/core/bootstrap/layouts/layouts.factor @@ -1,9 +1,7 @@ ! Copyright (C) 2007, 2009 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: namespaces math words kernel alien byte-arrays -hashtables vectors strings sbufs arrays -quotations assocs layouts classes.tuple.private -kernel.private ; +USING: alien arrays byte-arrays kernel layouts math namespaces +quotations strings words ; 16 data-alignment set diff --git a/core/byte-arrays/byte-arrays.factor b/core/byte-arrays/byte-arrays.factor index f9c6280091..d4d2d95cf2 100644 --- a/core/byte-arrays/byte-arrays.factor +++ b/core/byte-arrays/byte-arrays.factor @@ -1,7 +1,7 @@ ! Copyright (C) 2007, 2009 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: accessors kernel kernel.private alien.accessors sequences -sequences.private math ; +USING: accessors alien.accessors kernel math sequences +sequences.private ; IN: byte-arrays M: byte-array clone (clone) ; inline diff --git a/core/byte-vectors/byte-vectors.factor b/core/byte-vectors/byte-vectors.factor index e4bc48f691..54f464a9dc 100644 --- a/core/byte-vectors/byte-vectors.factor +++ b/core/byte-vectors/byte-vectors.factor @@ -1,7 +1,7 @@ ! Copyright (C) 2008 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: arrays kernel kernel.private math sequences -sequences.private growable byte-arrays accessors ; +USING: accessors byte-arrays growable kernel math sequences +sequences.private ; IN: byte-vectors TUPLE: byte-vector diff --git a/core/checksums/crc32/crc32.factor b/core/checksums/crc32/crc32.factor index 415317c813..da3df72974 100644 --- a/core/checksums/crc32/crc32.factor +++ b/core/checksums/crc32/crc32.factor @@ -1,8 +1,7 @@ ! Copyright (C) 2006 Doug Coleman ! See http://factorcode.org/license.txt for BSD license. -USING: kernel math sequences sequences.private namespaces -words io io.binary io.files quotations -definitions checksums ; +USING: checksums io.binary kernel math sequences +sequences.private ; IN: checksums.crc32 CONSTANT: crc32-polynomial 0xedb88320 diff --git a/core/destructors/destructors.factor b/core/destructors/destructors.factor index 5f8e7b48f0..697bc2eeef 100755 --- a/core/destructors/destructors.factor +++ b/core/destructors/destructors.factor @@ -1,7 +1,7 @@ ! Copyright (C) 2007, 2010 Doug Coleman, Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: accessors continuations kernel namespaces make -sequences vectors sets assocs init math ; +USING: accessors assocs continuations init kernel make +namespaces sequences sets ; FROM: namespaces => set ; IN: destructors diff --git a/core/effects/effects.factor b/core/effects/effects.factor index 1ac78fcae8..46bd9eeaa9 100644 --- a/core/effects/effects.factor +++ b/core/effects/effects.factor @@ -1,8 +1,7 @@ ! Copyright (C) 2006, 2010 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: kernel math math.parser math.order namespaces make -sequences strings words assocs combinators accessors arrays -quotations classes.algebra classes ; +USING: accessors arrays classes combinators kernel make math +math.order math.parser sequences strings words ; IN: effects TUPLE: effect diff --git a/core/graphs/graphs.factor b/core/graphs/graphs.factor index e35e29ff14..eed2a69c33 100644 --- a/core/graphs/graphs.factor +++ b/core/graphs/graphs.factor @@ -1,6 +1,6 @@ ! Copyright (C) 2006, 2007 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: assocs kernel namespaces sequences sets ; +USING: assocs kernel sequences sets ; IN: graphs > first 1quotation ; \ No newline at end of file +M: alias definition def>> first 1quotation ; diff --git a/core/words/constant/constant.factor b/core/words/constant/constant.factor index 30503bc92f..0d45bbb0fd 100644 --- a/core/words/constant/constant.factor +++ b/core/words/constant/constant.factor @@ -1,6 +1,6 @@ ! Copyright (C) 2008, 2009 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: accessors kernel sequences words definitions quotations ; +USING: definitions kernel quotations words ; IN: words.constant PREDICATE: constant < word "constant" word-prop >boolean ; diff --git a/core/words/symbol/symbol.factor b/core/words/symbol/symbol.factor index fdb7e862ca..0d94ea5abe 100644 --- a/core/words/symbol/symbol.factor +++ b/core/words/symbol/symbol.factor @@ -1,6 +1,6 @@ ! Copyright (C) 2008 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: kernel sequences accessors definitions words ; +USING: accessors definitions kernel sequences words ; IN: words.symbol PREDICATE: symbol < word diff --git a/core/words/words.factor b/core/words/words.factor index d338d7f576..c17f265753 100644 --- a/core/words/words.factor +++ b/core/words/words.factor @@ -1,9 +1,8 @@ ! Copyright (C) 2004, 2010 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: accessors arrays definitions kernel kernel.private -slots.private math namespaces sequences strings vectors sbufs -quotations assocs hashtables sorting vocabs math.order sets -words.private ; +USING: accessors arrays assocs definitions hashtables kernel +kernel.private math math.order namespaces quotations sequences +slots.private strings vocabs ; FROM: assocs => change-at ; IN: words