More unit test fixes

db4
Slava Pestov 2008-07-29 16:57:30 -05:00
parent 6408b01e9d
commit 6047429401
6 changed files with 6 additions and 7 deletions

View File

@ -1,7 +1,7 @@
IN: compiler.tests IN: compiler.tests
USING: accessors compiler compiler.units tools.test math parser USING: accessors compiler compiler.units tools.test math parser
kernel sequences sequences.private classes.mixin generic kernel sequences sequences.private classes.mixin generic
definitions arrays words assocs ; definitions arrays words assocs eval ;
GENERIC: method-redefine-test ( a -- b ) GENERIC: method-redefine-test ( a -- b )

View File

@ -1,7 +1,7 @@
IN: compiler.tests IN: compiler.tests
USING: compiler compiler.units tools.test math parser kernel USING: compiler compiler.units tools.test math parser kernel
sequences sequences.private classes.mixin generic definitions sequences sequences.private classes.mixin generic definitions
arrays words assocs ; arrays words assocs eval ;
DEFER: blah DEFER: blah

View File

@ -1,7 +1,7 @@
IN: compiler.tests IN: compiler.tests
USING: accessors compiler compiler.units tools.test math parser USING: accessors compiler compiler.units tools.test math parser
kernel sequences sequences.private classes.mixin generic kernel sequences sequences.private classes.mixin generic
definitions arrays words assocs ; definitions arrays words assocs eval ;
GENERIC: sheeple ( obj -- x ) GENERIC: sheeple ( obj -- x )

View File

@ -1,6 +1,6 @@
USING: compiler.units tools.test kernel kernel.private USING: compiler.units tools.test kernel kernel.private
sequences.private math.private math combinators strings sequences.private math.private math combinators strings
alien arrays memory vocabs parser ; alien arrays memory vocabs parser eval ;
IN: compiler.tests IN: compiler.tests
! Test empty word ! Test empty word

View File

@ -1,6 +1,6 @@
USING: locals math sequences tools.test hashtables words kernel USING: locals math sequences tools.test hashtables words kernel
namespaces arrays strings prettyprint io.streams.string parser namespaces arrays strings prettyprint io.streams.string parser
accessors generic ; accessors generic eval ;
IN: locals.tests IN: locals.tests
:: foo ( a b -- a a ) a a ; :: foo ( a b -- a a ) a a ;

View File

@ -7,13 +7,12 @@ init io.files bootstrap.image bootstrap.image.private vocabs
vocabs.loader system debugger continuations ; vocabs.loader system debugger continuations ;
IN: bootstrap.stage1 IN: bootstrap.stage1
{ "resource:core" } vocab-roots set
"Bootstrap stage 1..." print flush "Bootstrap stage 1..." print flush
"resource:core/bootstrap/primitives.factor" run-file "resource:core/bootstrap/primitives.factor" run-file
load-help? off load-help? off
{ "resource:core" } vocab-roots set
! Create a boot quotation for the target ! Create a boot quotation for the target
[ [