From 690dffaa0474075f4b327e2a93a80c2b3bb24858 Mon Sep 17 00:00:00 2001
From: Oldes <oldes.huhuman@gmail.com>
Date: Sat, 9 Jun 2018 01:01:47 +0200
Subject: [PATCH] FEAT: REDUCE/NO-SET working also with set-path!

fixes: https://github.com/rebol/rebol-issues/issues/2122

>>  reduce/no-set [x/1: now/date]
== [x/1: 9-Jun-2018]
---
 src/core/c-do.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/core/c-do.c b/src/core/c-do.c
index 1f57507808..a4a6937936 100644
--- a/src/core/c-do.c
+++ b/src/core/c-do.c
@@ -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