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

basis/*: Pare down some using lists

db4
Doug Coleman 2011-11-30 23:09:49 -08:00
parent cab4dc6ba3
commit e9809a67e8
2 changed files with 7 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
basis/calendar/unix/unix.factor
View File

@ -1,8 +1,7 @@
! Copyright (C) 2008 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: alien alien.c-types alien.data alien.syntax arrays
calendar kernel math unix unix.time unix.types namespaces system
accessors classes.struct ;
USING: accessors alien.data calendar classes.struct kernel math
system unix unix.time unix.types ;
IN: calendar.unix
: timeval>duration ( timeval -- duration )

12
basis/classes/struct/struct.factor
View File

@ -2,14 +2,14 @@
! John Benediktsson, Slava Pestov.
! See http://factorcode.org/license.txt for BSD license
USING: accessors alien alien.c-types alien.data alien.parser
arrays byte-arrays classes classes.parser
arrays byte-arrays classes classes.parser classes.private
classes.struct.bit-accessors classes.tuple classes.tuple.parser
combinators combinators.smart cpu.architecture fry
functors.backend generalizations generic.parser kernel
combinators combinators.smart cpu.architecture definitions fry
functors.backend generalizations generic generic.parser kernel
kernel.private lexer libc locals macros math math.order parser
quotations sequences slots slots.private specialized-arrays
stack-checker.dependencies summary vectors vocabs.parser words
classes.private generic definitions vocabs ;
stack-checker.dependencies summary vectors vocabs.loader
vocabs.parser words ;
FROM: delegate.private => group-words slot-group-words ;
QUALIFIED: math
IN: classes.struct
@ -426,6 +426,4 @@ FUNCTOR-SYNTAX: STRUCT:
[ parse-struct-slots` ] [ ] while
[ >array define-struct-class ] append! ;
USING: vocabs.loader ;
{ "classes.struct" "prettyprint" } "classes.struct.prettyprint" require-when