fix unit test
parent
11feb563eb
commit
e62c3c323c
|
@ -4,7 +4,7 @@ IN: classes.singleton.tests
|
|||
[ ] [ SINGLETON: bzzt ] unit-test
|
||||
[ t ] [ bzzt bzzt? ] unit-test
|
||||
[ t ] [ bzzt bzzt eq? ] unit-test
|
||||
GENERIC: zammo ( obj -- )
|
||||
GENERIC: zammo ( obj -- str )
|
||||
[ ] [ M: bzzt zammo drop "yes!" ; ] unit-test
|
||||
[ "yes!" ] [ bzzt zammo ] unit-test
|
||||
[ ] [ SINGLETON: omg ] unit-test
|
||||
|
|
Loading…
Reference in New Issue