From dfacba5f3bd37e7888a20f3fb4532656b170ae98 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Tue, 11 Mar 2008 03:36:33 -0500 Subject: [PATCH] Clean up erg's change --- core/parser/parser.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/core/parser/parser.factor b/core/parser/parser.factor index 1bdff49506..81c9b68668 100755 --- a/core/parser/parser.factor +++ b/core/parser/parser.factor @@ -240,7 +240,7 @@ PREDICATE: unexpected unexpected-eof : CREATE ( -- word ) scan create-in ; -: create-class-in ( word vocab -- word ) +: create-class-in ( word -- word ) in get create dup save-class-location dup predicate-word dup set-word save-location ;