From df3cf77e5921ac1755c299354809d8efc8e02ee2 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Wed, 19 Oct 2011 00:57:06 -0700 Subject: [PATCH] Fix tools.annotations tests --- basis/tools/annotations/annotations-tests.factor | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/basis/tools/annotations/annotations-tests.factor b/basis/tools/annotations/annotations-tests.factor index dcfc6ae522..3bdc0b951b 100644 --- a/basis/tools/annotations/annotations-tests.factor +++ b/basis/tools/annotations/annotations-tests.factor @@ -1,5 +1,6 @@ -USING: tools.test tools.annotations tools.time math parser eval -io.streams.string kernel strings sequences memory ; +USING: destructors eval io io.streams.string kernel math memory +namespaces parser sequences strings tools.annotations +tools.test tools.time ; IN: tools.annotations.tests : foo ( -- ) ; @@ -62,8 +63,9 @@ M: object my-generic ; [ ] [ some-code ] unit-test ! Make sure annotations work on primitives +\ gc reset \ gc watch - -[ f ] [ [ gc ] with-string-writer empty? ] unit-test + +[ f ] [ [ [ gc ] with-error>output ] with-string-writer empty? ] unit-test \ gc reset