Skip to content

Commit

Permalink
core/basis: trim down using lists
Browse files Browse the repository at this point in the history
  • Loading branch information
erg committed Dec 1, 2011
1 parent 4e91f85 commit c3dcf43
Show file tree
Hide file tree
Showing 29 changed files with 69 additions and 82 deletions.
10 changes: 4 additions & 6 deletions basis/bootstrap/stage2.factor
@@ -1,11 +1,9 @@
! Copyright (C) 2004, 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors init namespaces words words.symbol io
kernel.private math memory continuations kernel io.files
io.pathnames io.backend system parser vocabs sequences
vocabs.loader combinators splitting source-files strings
definitions assocs compiler.units math.parser
generic sets command-line parser.notes ;
USING: command-line compiler.units continuations definitions io
io.pathnames kernel math math.parser memory namespaces parser
parser.notes sequences sets splitting system
vocabs vocabs.loader ;
IN: bootstrap.stage2

SYMBOL: core-bootstrap-time
Expand Down
4 changes: 2 additions & 2 deletions basis/combinators/short-circuit/short-circuit.factor
@@ -1,5 +1,5 @@
USING: kernel combinators quotations arrays sequences assocs
generalizations macros fry math ;
USING: arrays combinators fry generalizations kernel macros
math sequences ;
IN: combinators.short-circuit

<PRIVATE
Expand Down
10 changes: 5 additions & 5 deletions basis/command-line/command-line.factor
@@ -1,10 +1,10 @@
! Copyright (C) 2003, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors alien.strings assocs continuations fry
hashtables init io io.encodings.utf8 io.files io.pathnames
kernel kernel.private namespaces parser parser.notes sequences
source-files source-files.errors splitting strings system
tools.errors vocabs.loader ;
USING: accessors alien.strings assocs continuations fry init
io.encodings.utf8 io.files io.pathnames kernel kernel.private
namespaces parser parser.notes sequences source-files
source-files.errors splitting system tools.errors
vocabs.loader ;
IN: command-line

SYMBOL: user-init-errors
Expand Down
9 changes: 4 additions & 5 deletions basis/tools/profiler/sampling/sampling.factor
@@ -1,11 +1,10 @@
! (c)2011 Joe Groff bsd license
USING: accessors assocs calendar combinators
combinators.short-circuit continuations fry generalizations
hashtables.identity io kernel kernel.private locals math
math.statistics math.vectors memory namespaces prettyprint
sequences sequences.generalizations sets sorting
tools.profiler.sampling.private math.parser.private
math.parser layouts ;
hashtables.identity io kernel kernel.private layouts locals
math math.parser math.parser.private math.statistics
math.vectors memory namespaces prettyprint sequences
sequences.generalizations sets sorting ;
FROM: sequences => change-nth ;
FROM: assocs => change-at ;
IN: tools.profiler.sampling
Expand Down
5 changes: 2 additions & 3 deletions core/alien/alien.factor
@@ -1,8 +1,7 @@
! Copyright (C) 2004, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs kernel math namespaces sequences system
kernel.private byte-arrays byte-vectors arrays init
continuations.private ;
USING: accessors byte-arrays byte-vectors continuations.private
init kernel kernel.private math namespaces sequences ;
IN: alien

PREDICATE: pinned-alien < alien underlying>> not ;
Expand Down
3 changes: 1 addition & 2 deletions core/arrays/arrays.factor
@@ -1,7 +1,6 @@
! Copyright (C) 2005, 2010 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 sequences sequences.private ;
IN: arrays

M: array clone (clone) ; inline
Expand Down
4 changes: 2 additions & 2 deletions core/assocs/assocs.factor
@@ -1,7 +1,7 @@
! Copyright (C) 2007, 2010 Daniel Ehrenberg, Slava Pestov
! See http://factorcode.org/license.txt for BSD license.
USING: kernel sequences arrays math sequences.private vectors
accessors ;
USING: accessors arrays kernel math sequences sequences.private
vectors ;
IN: assocs

MIXIN: assoc
Expand Down
4 changes: 2 additions & 2 deletions core/checksums/checksums.factor
@@ -1,7 +1,7 @@
! Copyright (c) 2008 Slava Pestov
! See http://factorcode.org/license.txt for BSD license.
USING: accessors io io.backend io.files kernel math math.parser
sequences byte-arrays byte-vectors quotations ;
USING: accessors byte-arrays byte-vectors io io.backend
io.files kernel math math.parser sequences ;
IN: checksums

MIXIN: checksum
Expand Down
6 changes: 3 additions & 3 deletions core/combinators/combinators.factor
@@ -1,8 +1,8 @@
! Copyright (C) 2006, 2010 Slava Pestov, Daniel Ehrenberg.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays sequences sequences.private math.private
kernel kernel.private math assocs quotations vectors
hashtables sorting words sets math.order make ;
USING: accessors arrays assocs hashtables kernel kernel.private
make math math.order math.private quotations sequences
sequences.private sets sorting words ;
IN: combinators

! Most of these combinators have compile-time expansions in
Expand Down
8 changes: 4 additions & 4 deletions core/compiler/units/units.factor
@@ -1,9 +1,9 @@
! Copyright (C) 2008, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays kernel continuations assocs namespaces
sequences words vocabs definitions hashtables init sets math
math.order classes classes.private classes.algebra classes.tuple
classes.tuple.private generic source-files.errors kernel.private ;
USING: accessors arrays assocs classes classes.private
classes.tuple classes.tuple.private continuations definitions
generic init kernel kernel.private math namespaces sequences
sets source-files.errors vocabs words ;
FROM: namespaces => set ;
IN: compiler.units

Expand Down
5 changes: 2 additions & 3 deletions core/continuations/continuations.factor
@@ -1,8 +1,7 @@
! Copyright (C) 2003, 2011 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: arrays vectors kernel kernel.private sequences
namespaces make math splitting sorting quotations assocs
combinators combinators.private accessors words ;
USING: accessors assocs combinators combinators.private kernel
kernel.private make namespaces sequences vectors ;
IN: continuations

: with-datastack ( stack quot -- new-stack )
Expand Down
2 changes: 1 addition & 1 deletion core/definitions/definitions.factor
@@ -1,6 +1,6 @@
! Copyright (C) 2006, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: kernel sequences namespaces assocs math accessors ;
USING: accessors assocs kernel namespaces sequences ;
IN: definitions

MIXIN: definition
Expand Down
8 changes: 4 additions & 4 deletions core/generic/generic.factor
@@ -1,9 +1,9 @@
! Copyright (C) 2006, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors words kernel sequences namespaces make assocs
hashtables definitions kernel.private classes classes.private
classes.algebra quotations arrays vocabs effects combinators
sets classes.maybe classes.algebra.private ;
USING: accessors arrays assocs classes classes.algebra
classes.algebra.private classes.maybe classes.private
combinators definitions kernel make namespaces sequences sets
words ;
FROM: namespaces => set ;
IN: generic

Expand Down
5 changes: 2 additions & 3 deletions core/generic/hook/hook.factor
@@ -1,8 +1,7 @@
! Copyright (C) 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors definitions generic generic.single
generic.single.private kernel namespaces words kernel.private
quotations sequences ;
USING: accessors definitions generic generic.single kernel
kernel.private namespaces quotations sequences words ;
QUALIFIED-WITH: generic.single.private gsp
IN: generic.hook

Expand Down
7 changes: 3 additions & 4 deletions core/generic/math/math.factor
@@ -1,9 +1,8 @@
! Copyright (C) 2005, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: arrays generic hashtables kernel kernel.private math
namespaces sequences words quotations layouts combinators
sequences.private classes classes.builtin classes.algebra
definitions math.order math.private assocs ;
USING: arrays assocs classes classes.algebra combinators
definitions generic kernel kernel.private math math.order
math.private namespaces quotations sequences words ;
IN: generic.math

PREDICATE: math-class < class
Expand Down
4 changes: 2 additions & 2 deletions core/generic/parser/parser.factor
@@ -1,7 +1,7 @@
! Copyright (C) 2008, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays combinators effects effects.parser
generic kernel namespaces parser quotations sequences words ;
USING: accessors arrays combinators effects.parser generic
kernel namespaces parser quotations sequences words ;
IN: generic.parser

ERROR: not-in-a-method-error ;
Expand Down
7 changes: 3 additions & 4 deletions core/generic/single/single.factor
@@ -1,10 +1,9 @@
! Copyright (C) 2009, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays assocs classes classes.algebra
combinators definitions generic hashtables kernel
kernel.private layouts math namespaces quotations
sequences words generic.single.private effects make
combinators.private ;
combinators combinators.private definitions effects generic
hashtables kernel layouts make math namespaces quotations
sequences words ;
FROM: assocs => change-at ;
IN: generic.single

Expand Down
7 changes: 3 additions & 4 deletions core/generic/standard/standard.factor
@@ -1,9 +1,8 @@
! Copyright (C) 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors definitions generic generic.single kernel
namespaces words math math.order combinators sequences
generic.single.private quotations kernel.private
assocs arrays layouts make ;
USING: accessors arrays combinators definitions generic
generic.single generic.single.private kernel layouts make math
namespaces quotations sequences words ;
IN: generic.standard

ERROR: bad-dispatch-position # ;
Expand Down
4 changes: 2 additions & 2 deletions core/io/io.factor
@@ -1,7 +1,7 @@
! Copyright (C) 2003, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors alien byte-arrays combinators continuations destructors
kernel math namespaces sequences sequences.private kernel.private ;
USING: combinators destructors kernel kernel.private math
namespaces sequences sequences.private ;
IN: io

SYMBOLS: +byte+ +character+ ;
Expand Down
4 changes: 2 additions & 2 deletions core/math/parser/parser.factor
@@ -1,7 +1,7 @@
! (c)2009 Joe Groff bsd license
USING: accessors byte-arrays combinators kernel kernel.private
math namespaces sequences sequences.private splitting strings
make ;
make math namespaces sequences sequences.private splitting
strings ;
IN: math.parser

: digit> ( ch -- n )
Expand Down
4 changes: 2 additions & 2 deletions core/memory/memory.factor
@@ -1,7 +1,7 @@
! Copyright (C) 2005, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: alien.strings io.backend io.pathnames kernel
memory.private sequences system ;
USING: alien.strings io.backend kernel memory.private sequences
system ;
IN: memory

: instances ( quot -- seq )
Expand Down
4 changes: 2 additions & 2 deletions core/namespaces/namespaces.factor
@@ -1,7 +1,7 @@
! Copyright (C) 2003, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: kernel vectors sequences sequences.private hashtables
arrays kernel.private math strings assocs ;
USING: arrays assocs hashtables kernel kernel.private math
sequences vectors ;
SLOT: boxes
SLOT: value
FROM: accessors => boxes>> value>> value<< ;
Expand Down
3 changes: 2 additions & 1 deletion core/parser/notes/notes.factor
@@ -1,6 +1,7 @@
! Copyright (C) 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: namespaces kernel source-files lexer accessors io math.parser ;
USING: accessors io kernel lexer math.parser namespaces
source-files ;
IN: parser.notes

SYMBOL: parser-quiet?
Expand Down
4 changes: 2 additions & 2 deletions core/sequences/sequences.factor
@@ -1,7 +1,7 @@
! Copyright (C) 2005, 2011 Slava Pestov, Daniel Ehrenberg.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors kernel kernel.private slots.private math
math.private math.order ;
USING: accessors kernel kernel.private math math.order
math.private slots.private ;
IN: sequences

MIXIN: sequence
Expand Down
3 changes: 1 addition & 2 deletions core/sets/sets.factor
@@ -1,7 +1,6 @@
! Copyright (C) 2010 Daniel Ehrenberg
! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs hashtables kernel vectors
math sequences ;
USING: assocs hashtables kernel math sequences vectors ;
FROM: assocs => change-at ;
IN: sets

Expand Down
3 changes: 1 addition & 2 deletions core/splitting/splitting.factor
@@ -1,7 +1,6 @@
! Copyright (C) 2005, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: kernel math make strings arrays vectors sequences
sets math.order accessors ;
USING: arrays kernel make math sequences sets strings ;
IN: splitting

<PRIVATE
Expand Down
3 changes: 1 addition & 2 deletions core/system/system.factor
@@ -1,7 +1,6 @@
! Copyright (C) 2007, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: kernel kernel.private sequences math namespaces
init splitting assocs system.private layouts words ;
USING: assocs init kernel.private namespaces ;
IN: system

SINGLETONS: x86.32 x86.64 arm ppc.32 ppc.64 ;
Expand Down
7 changes: 3 additions & 4 deletions core/vocabs/loader/loader.factor
@@ -1,9 +1,8 @@
! Copyright (C) 2007, 2010 Eduardo Cavazos, Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: namespaces make sequences io io.files io.pathnames kernel
assocs words vocabs definitions parser continuations hashtables
sorting source-files arrays combinators strings system
math.parser splitting init accessors sets ;
USING: accessors arrays assocs continuations definitions init
io io.files io.pathnames kernel make namespaces parser
sequences sets splitting strings vocabs words ;
IN: vocabs.loader

SYMBOL: vocab-roots
Expand Down
4 changes: 2 additions & 2 deletions core/vocabs/vocabs.factor
@@ -1,7 +1,7 @@
! Copyright (C) 2007, 2009 Eduardo Cavazos, Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs strings kernel sorting namespaces
sequences definitions sets combinators splitting ;
USING: accessors assocs definitions kernel namespaces sequences
sets sorting splitting strings ;
IN: vocabs

SYMBOL: dictionary
Expand Down

0 comments on commit c3dcf43

Please sign in to comment.