Forget some classes after unit tests so that running "classes" test succeeds multiple times in a row

db4
Doug Coleman 2011-10-24 16:59:46 -07:00
parent d5dc5cfa2c
commit df64529fb5
2 changed files with 3 additions and 1 deletions

View File

@ -8,7 +8,7 @@ destructors io.encodings.utf8 io.pathnames io.streams.string
kernel libc literals math mirrors namespaces prettyprint
prettyprint.config see sequences specialized-arrays system
tools.test parser lexer eval layouts generic.single classes
vocabs generic classes.private ;
vocabs generic classes.private definitions ;
FROM: math => float ;
FROM: specialized-arrays.private => specialized-array-vocab ;
QUALIFIED-WITH: alien.c-types c
@ -553,3 +553,4 @@ STRUCT: some-accessors { aaa uint } { bbb int } ;
[ f ] [ \ some-accessors \ clone ?lookup-method ] unit-test
[ f ] [ \ some-accessors \ struct-slot-values ?lookup-method ] unit-test
<< \ some-accessors forget >>

View File

@ -817,3 +817,4 @@ TUPLE: rclasstest a b ;
[ f ] [ \ rclasstest \ b>> ?lookup-method ] unit-test
[ f ] [ \ rclasstest \ b<< ?lookup-method ] unit-test
<< \ rclasstest forget >>