diff --git a/core/effects/parser/parser.factor b/core/effects/parser/parser.factor index 746e512d55..689757f464 100644 --- 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