Fix tools.annotations tests
parent
0e46502f6e
commit
df3cf77e59
|
@ -1,5 +1,6 @@
|
||||||
USING: tools.test tools.annotations tools.time math parser eval
|
USING: destructors eval io io.streams.string kernel math memory
|
||||||
io.streams.string kernel strings sequences memory ;
|
namespaces parser sequences strings tools.annotations
|
||||||
|
tools.test tools.time ;
|
||||||
IN: tools.annotations.tests
|
IN: tools.annotations.tests
|
||||||
|
|
||||||
: foo ( -- ) ;
|
: foo ( -- ) ;
|
||||||
|
@ -62,8 +63,9 @@ M: object my-generic ;
|
||||||
[ ] [ some-code ] unit-test
|
[ ] [ some-code ] unit-test
|
||||||
|
|
||||||
! Make sure annotations work on primitives
|
! Make sure annotations work on primitives
|
||||||
|
\ gc reset
|
||||||
\ gc watch
|
\ gc watch
|
||||||
|
|
||||||
[ f ] [ [ gc ] with-string-writer empty? ] unit-test
|
[ f ] [ [ [ gc ] with-error>output ] with-string-writer empty? ] unit-test
|
||||||
|
|
||||||
\ gc reset
|
\ gc reset
|
||||||
|
|
Loading…
Reference in New Issue