Skip to content

Commit

Permalink
FEAT: REDUCE/NO-SET working also with set-path!
Browse files Browse the repository at this point in the history
fixes: metaeducation/rebol-issues#2122

>>  reduce/no-set [x/1: now/date]
== [x/1: 9-Jun-2018]
  • Loading branch information
Oldes committed Jun 8, 2018
1 parent 3385185 commit 690dffa
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion src/core/c-do.c
Original file line number Diff line number Diff line change
Expand Up @@ -1182,7 +1182,8 @@ x*/ static REBINT Do_Args_Light(REBVAL *func, REBVAL *path, REBSER *block, REBCN
REBVAL *val;

while (index < BLK_LEN(block)) {
if (IS_SET_WORD(val = BLK_SKIP(block, index))) {
val = BLK_SKIP(block, index);
if (IS_SET_WORD(val) || IS_SET_PATH(val)) {
DS_PUSH(val);
index++;
} else
Expand Down

0 comments on commit 690dffa

Please sign in to comment.