fix stack effect

Doug Coleman 2009-05-28 12:28:52 -05:00
parent caf4b6c8a1
commit f6d139bee2
1 changed files with 1 additions and 1 deletions

View File

@ -6,7 +6,7 @@ IN: classes.parser
: save-class-location ( class -- )
location remember-class ;
: create-class-in ( word -- word )
: create-class-in ( string -- word )
current-vocab create
dup save-class-location
dup predicate-word dup set-word save-location ;