effests.parser: Oops wrong word.

2013-04-14 13:33:48 -07:00 · 2013-04-14 13:33:48 -07:00 · ee921150c7
parent bd3762502f
commit ee921150c7
1 changed files with 1 additions and 1 deletions
--- a/core/effects/parser/parser.factor
+++ b/core/effects/parser/parser.factor
@ -57,7 +57,7 @@ SYMBOL: in-definition
 ERROR: can't-nest-definitions word ;

 : check-in-definition ( -- )
-    in-definition get [ current-word can't-nest-definitions ] when ;
+    in-definition get [ last-word can't-nest-definitions ] when ;

 : with-definition ( quot -- )
    [ check-in-definition t in-definition ] dip with-variable ; inline