fix stack effect
parent
5e4506c987
commit
bbf0a8d266
|
@ -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 ;
|
||||
|
|
Loading…
Reference in New Issue