classes: remove fragile unit test

db4
Slava Pestov 2010-08-21 18:10:09 -07:00
parent 0d6f3354ab
commit 30dea58330
1 changed files with 0 additions and 10 deletions

View File

@ -28,16 +28,6 @@ M: method-forget-class method-forget-test ;
[ diff ] [ swap diff ] 2bi
] unit-test
! Minor leak
[ ] [ "IN: classes.tests TUPLE: forget-me ;" eval( -- ) ] unit-test
[ ] [ f \ word set-global ] unit-test
[ ] [ "IN: classes.tests USE: kernel USE: classes.algebra forget-me tuple class<= drop" eval( -- ) ] unit-test
[ ] [ "IN: classes.tests FORGET: forget-me" eval( -- ) ] unit-test
[ 0 ] [
[ word? ] instances
[ [ name>> "forget-me" = ] [ vocabulary>> "classes.tests" = ] bi and ] count
] unit-test
! Long-standing problem
USE: multiline