fix stack effect

diff --git a/core/classes/parser/parser.factor b/core/classes/parser/parser.factor
index bd2e6ea4a07e3f28b3a3f85b95d3484c153c933f..0697537d124f0b0f6a275b3ad5930f9a1e0f58b3 100644 (file)
--- a/core/classes/parser/parser.factor
+++ b/core/classes/parser/parser.factor
@@ -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 ;