core: cleanup USING lists.

db4
John Benediktsson 2013-03-05 10:34:47 -08:00
parent 5751f6d309
commit 5487480126
40 changed files with 94 additions and 104 deletions

View File

@ -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 )

View File

@ -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

View File

@ -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

View File

@ -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

View File

@ -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

View File

@ -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

View File

@ -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

View File

@ -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
<PRIVATE

View File

@ -1,7 +1,7 @@
! Copyright (C) 2005, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors kernel kernel.private math math.private
sequences sequences.private ;
USING: accessors kernel math math.private sequences
sequences.private ;
IN: growable
MIXIN: growable

View File

@ -1,8 +1,7 @@
! Copyright (C) 2010 Daniel Ehrenberg
! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs hashtables kernel sets sets.private
sequences parser ;
USING: accessors assocs hashtables kernel sequences sets
sets.private ;
IN: hash-sets
! In a better implementation, less memory would be used

View File

@ -1,7 +1,7 @@
! Copyright (C) 2005, 2011 John Benediktsson, Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays kernel kernel.private slots.private math
assocs math.private sequences sequences.private vectors ;
USING: accessors arrays assocs kernel kernel.private math
math.private sequences sequences.private slots.private vectors ;
IN: hashtables
TUPLE: hashtable

View File

@ -1,7 +1,7 @@
! Copyright (C) 2004, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: continuations continuations.private kernel
kernel.private sequences assocs namespaces namespaces.private ;
USING: assocs continuations continuations.private kernel
kernel.private namespaces ;
IN: init
SYMBOL: startup-hooks

View File

@ -1,7 +1,7 @@
! Copyright (C) 2007, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: init kernel system namespaces io io.encodings
io.encodings.utf8 assocs splitting alien ;
USING: assocs init io io.encodings io.encodings.utf8 kernel
namespaces system ;
IN: io.backend
SYMBOL: io-backend

View File

@ -1,8 +1,8 @@
! Copyright (C) 2004, 2009 Slava Pestov, Daniel Ehrenberg.
! See http://factorcode.org/license.txt for BSD license.
USING: kernel kernel.private sequences init namespaces system io
io.encodings.utf8 io.backend io.pathnames io.encodings io.files.private
alien.strings splitting ;
USING: alien.strings init io io.backend io.encodings
io.encodings.utf8 io.files.private io.pathnames kernel
kernel.private namespaces sequences splitting system ;
IN: io.files
MIXIN: file-reader

View File

@ -1,7 +1,7 @@
! Copyright (C) 2003, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: combinators destructors kernel kernel.private math
namespaces sequences sequences.private ;
USING: destructors kernel kernel.private math namespaces
sequences sequences.private ;
IN: io
SYMBOLS: +byte+ +character+ ;

View File

@ -1,8 +1,8 @@
! Copyright (C) 2008, 2009 Daniel Ehrenberg
! See http://factorcode.org/license.txt for BSD license.
USING: accessors byte-arrays byte-vectors destructors io
io.encodings io.private io.streams.sequence kernel namespaces
sequences sequences.private ;
io.encodings io.streams.sequence kernel namespaces sequences
sequences.private ;
IN: io.streams.byte-array
INSTANCE: byte-vector output-stream

View File

@ -1,9 +1,8 @@
! Copyright (C) 2004, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: alien alien.strings kernel kernel.private namespaces make
io io.encodings sequences math generic threads.private classes
io.backend io.files io.encodings.utf8 continuations destructors
byte-arrays accessors combinators ;
USING: accessors alien alien.strings byte-arrays destructors io
io.backend io.encodings.utf8 io.files kernel kernel.private
make math sequences threads.private ;
IN: io.streams.c
TUPLE: c-stream < disposable handle ;

View File

@ -1,6 +1,6 @@
! Copyright (C) 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: kernel accessors alien alien.accessors math io ;
USING: accessors alien alien.accessors io kernel ;
IN: io.streams.memory
TUPLE: memory-stream alien ;

View File

@ -6,4 +6,4 @@ IN: io.streams.plain
MIXIN: plain-writer
M: plain-writer stream-nl
CHAR: \n swap stream-write1 ;
CHAR: \n swap stream-write1 ;

View File

@ -1,7 +1,8 @@
! Copyright (C) 2009 Daniel Ehrenberg
! See http://factorcode.org/license.txt for BSD license.
USING: sequences io io.streams.plain kernel accessors math math.order
growable destructors combinators sequences.private io.private ;
USING: accessors combinators destructors growable io io.private
io.streams.plain kernel math math.order sequences
sequences.private ;
IN: io.streams.sequence
! Readers

View File

@ -1,7 +1,6 @@
! Copyright (C) 2007, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: namespaces math words kernel assocs classes
math.order kernel.private sequences sequences.private ;
USING: assocs kernel kernel.private math math.order namespaces ;
IN: layouts
SYMBOL: data-alignment

View File

@ -1,8 +1,8 @@
! Copyright (C) 2008, 2010 Slava Pestov, Joe Groff.
! See http://factorcode.org/license.txt for BSD license.
USING: kernel sequences accessors namespaces math words strings
io vectors arrays math.parser combinators continuations
source-files.errors ;
USING: accessors arrays combinators continuations io kernel
math math.parser namespaces sequences source-files.errors
strings vectors ;
IN: lexer
TUPLE: lexer

View File

@ -1,8 +1,8 @@
! Copyright (C) 2004, 2010 Slava Pestov.
! Copyright (C) 2008, Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: kernel kernel.private sequences sequences.private math
math.private math.order combinators ;
USING: combinators kernel kernel.private math math.order
math.private ;
IN: math.integers.private
: fixnum-min ( x y -- z ) [ fixnum< ] most ; foldable

View File

@ -1,11 +1,10 @@
! Copyright (C) 2005, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: arrays definitions generic assocs kernel math namespaces
sequences strings vectors words words.symbol quotations io
combinators sorting splitting math.parser effects continuations
io.files vocabs io.encodings.utf8 source-files classes
hashtables compiler.units accessors sets lexer vocabs.parser
slots parser.notes classes.algebra ;
USING: accessors arrays assocs classes combinators
compiler.units continuations definitions effects io
io.encodings.utf8 io.files kernel lexer math.parser namespaces
parser.notes quotations sequences slots source-files vectors
vocabs vocabs.parser words words.symbol ;
IN: parser
: location ( -- loc )

View File

@ -1,8 +1,7 @@
! Copyright (C) 2006, 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays sequences sequences.private
kernel kernel.private math assocs quotations.private
slots.private ;
USING: accessors arrays kernel kernel.private math sequences
sequences.private slots.private ;
IN: quotations
<PRIVATE

View File

@ -1,7 +1,7 @@
! Copyright (C) 2004, 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors kernel math sequences.private sequences
strings growable strings.private ;
USING: accessors growable kernel math sequences
sequences.private strings strings.private ;
IN: sbufs
TUPLE: sbuf

View File

@ -1,7 +1,7 @@
! Copyright (C) 2005, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays assocs kernel math vectors math.order
sequences sequences.private ;
USING: accessors arrays assocs kernel math math.order sequences
sequences.private vectors ;
IN: sorting
! Optimized merge-sort:

View File

@ -1,7 +1,7 @@
! Copyright (C) 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs kernel math.order sorting sequences definitions
namespaces arrays splitting io math.parser math init continuations ;
USING: accessors assocs continuations definitions init io
kernel math math.parser namespaces sequences sorting ;
IN: source-files.errors
GENERIC: error-file ( error -- file )

View File

@ -1,10 +1,9 @@
! Copyright (C) 2007, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: arrays definitions generic assocs kernel math namespaces
sequences strings vectors words quotations io io.files
io.pathnames combinators sorting splitting math.parser effects
continuations checksums checksums.crc32 vocabs hashtables
compiler.units io.encodings.utf8 accessors source-files.errors ;
USING: accessors arrays assocs checksums checksums.crc32
compiler.units continuations definitions io.encodings.utf8
io.files io.pathnames kernel namespaces sequences
source-files.errors strings words ;
IN: source-files
SYMBOL: source-files

View File

@ -1,6 +1,6 @@
! Copyright (C) 2005, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: arrays kernel make math sequences sets strings ;
USING: arrays kernel make math sequences strings ;
IN: splitting
<PRIVATE

View File

@ -1,8 +1,7 @@
! Copyright (C) 2008, 2009 Slava Pestov, Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays assocs combinators kernel lexer make
math math.order math.parser namespaces parser sequences
splitting strings ;
math math.parser namespaces sequences splitting strings ;
IN: strings.parser
ERROR: bad-escape char ;

View File

@ -1,7 +1,8 @@
! Copyright (C) 2003, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors alien.accessors byte-arrays kernel math.private
sequences kernel.private math sequences.private slots.private ;
USING: accessors alien.accessors byte-arrays kernel
kernel.private math math.private sequences sequences.private
slots.private ;
IN: strings
<PRIVATE

View File

@ -1,15 +1,15 @@
! Copyright (C) 2004, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors alien arrays byte-arrays byte-vectors definitions generic
hashtables kernel math namespaces parser lexer sequences strings
strings.parser sbufs vectors words words.symbol words.constant
words.alias quotations io assocs splitting classes.tuple
generic.standard generic.hook generic.math generic.parser classes
io.pathnames vocabs vocabs.parser classes.parser classes.union
classes.intersection classes.mixin classes.predicate
classes.singleton classes.tuple.parser compiler.units classes.maybe
combinators effects.parser slots hash-sets source-files
classes.algebra.private ;
USING: accessors arrays byte-arrays byte-vectors
classes.algebra.private classes.intersection classes.maybe
classes.mixin classes.parser classes.predicate
classes.singleton classes.tuple classes.tuple.parser
classes.union combinators compiler.units definitions
effects.parser generic generic.hook generic.math generic.parser
generic.standard hash-sets hashtables io.pathnames kernel lexer
math namespaces parser quotations sbufs sequences slots
source-files splitting strings strings.parser vectors
vocabs.parser words words.alias words.constant words.symbol ;
IN: bootstrap.syntax
! These words are defined as a top-level form, instead of with

View File

@ -1,7 +1,7 @@
! Copyright (C) 2004, 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: arrays kernel math sequences sequences.private growable
accessors ;
USING: accessors arrays growable kernel math sequences
sequences.private ;
IN: vectors
TUPLE: vector

View File

@ -1,10 +1,9 @@
! Copyright (C) 2007, 2010 Daniel Ehrenberg, Bruno Deferrari,
! Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: assocs hashtables kernel namespaces sequences
sets strings vocabs sorting accessors arrays compiler.units
combinators vectors splitting continuations math words
parser.notes ;
USING: accessors arrays assocs combinators compiler.units
continuations hashtables kernel math namespaces parser.notes
sequences sets sorting splitting vectors vocabs words ;
IN: vocabs.parser
ERROR: no-word-error name ;

View File

@ -1,7 +1,7 @@
! Copyright (C) 2007, 2009 Eduardo Cavazos, Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs definitions kernel namespaces sequences
sets sorting splitting strings ;
sorting splitting strings ;
IN: vocabs
SYMBOL: dictionary

View File

@ -1,6 +1,7 @@
! Copyright (C) 2008 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: quotations effects accessors sequences words kernel definitions ;
USING: accessors definitions effects kernel quotations
sequences words ;
IN: words.alias
PREDICATE: alias < word "alias" word-prop ;
@ -14,4 +15,4 @@ M: alias reset-word
M: alias definer drop \ ALIAS: f ;
M: alias definition def>> first 1quotation ;
M: alias definition def>> first 1quotation ;

View File

@ -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 ;

View File

@ -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

View File

@ -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