FEAT: allow path value protection

resolves: Oldes/Rebol-issues#1747
Oldes · Apr 24, 2024 · e156405 · e156405
1 parent bf2aac7
commit e156405
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/core/n-control.c b/src/core/n-control.c
@@ -224,7 +224,7 @@ enum {
 
 	if (D_REF(6)) SET_FLAG(flags, PROT_LOCK);
 
-	if (IS_WORD(val) || IS_PATH(val)) {
+	if (IS_WORD(val) || (ANY_PATH(val) && !D_REF(4))) {
 		Protect_Word_Value(val, flags); // will unmark if deep
 		return R_ARG1;
 	}