classes.singleton: Update another test.

char-rename
Doug Coleman 2017-06-04 12:57:38 -05:00
parent 50fbf0457a
commit 1708c8011f
1 changed files with 1 additions and 1 deletions

View File

@ -6,7 +6,7 @@ SINGLETON: bzzt
{ t } [ bzzt bzzt eq? ] unit-test
GENERIC: zammo ( obj -- str )
{ } [ M: bzzt zammo drop "yes!" ; ] unit-test
M: bzzt zammo drop "yes!" ;
{ "yes!" } [ bzzt zammo ] unit-test
SINGLETON: omg