steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Less use of eval( in unit tests

db4
Doug Coleman 2011-10-03 13:54:34 -07:00
parent 25cdeaf8b0
commit 8ee9fcc11f
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
basis/classes/struct/struct-tests.factor
View File

@ -535,12 +535,11 @@ STRUCT: struct-1-union { a int initial: 0 } ;
" ]
[ \ struct-1-union [ see ] with-string-writer ] unit-test
! Bug #206
STRUCT: going-to-forget { a uint } ;
STRUCT: going-to-redefine { a uint } ;
[ ] [
"IN: classes.struct.tests TUPLE: going-to-forget b ;" eval( -- )
"IN: classes.struct.tests TUPLE: going-to-redefine b ;" eval( -- )
] unit-test
[ f ] [ "USING: classes.struct.tests kernel ; M\\ going-to-forget clone" eval( -- obj ) ] unit-test
[ f ] [ "USING: classes.struct.tests classes.struct kernel ; M\\ going-to-forget struct-slot-values" eval( -- obj ) ] unit-test
[ f ] [ \ going-to-redefine \ clone method ] unit-test
[ f ] [ \ going-to-redefine \ struct-slot-values method ] unit-test