为什么变量不会从 Red 语言的循环中改变

Question

我想更改循环中的一系列变量，但以下代码不起作用：

a: 10
b: 20
c: 30
print reduce [a b c]              ; output is 10 20 30 as expected

varnames: [a b c]                 ; make a series of variables
foreach i varnames [              ; loop to convert each to 0
    i: 0
]

print "After conversion loop: "
print reduce [a b c]              ; values are still 10 20 30 (expected 0 0 0)

运行此代码后，我希望 a、b、c 的值会发生变化，但它们不会：

>> print reduce [a b c]   
10 20 30

问题出在哪里？

Answer 1

>> set varnames: [a b c] [10 20 30]
== [10 20 30]

>> foreach i varnames [set i 0]
== 0

>> reduce varnames
== [0 0 0]

你从循环中给 i 一个值，然后给它一个不同的值 0，但你实际上并没有改变我所指的词。 set 允许你这样做。

Answer 2

另一种，但最短的解决方案

>> set [a b c] 0
== 0
>> reduce [a b c]
== [0 0 0]

还有一个

set set 'varnames [a b c] [0]
>> print probe varnames
[a b c]
0 0 0