steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

effests.parser: Oops wrong word.

db4
Doug Coleman 2013-04-14 13:33:48 -07:00
parent bd3762502f
commit ee921150c7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
core/effects/parser/parser.factor
View File

@ -57,7 +57,7 @@ SYMBOL: in-definition
ERROR: can't-nest-definitions word ; ERROR: can't-nest-definitions word ;
: check-in-definition ( -- ) : 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 -- ) : with-definition ( quot -- )
[ check-in-definition t in-definition ] dip with-variable ; inline [ check-in-definition t in-definition ] dip with-variable ; inline