rebol - 在 REBOL 中动态地将单词添加到上下文中

Question

想象一下下面的 REBOL 代码:

foo: 上下文 [bar: 3]

我现在有一个上下文 foo其中'bar被定义为。我怎样才能在这个上下文中动态地注入(inject)一个新词？是否可以？

我试过了:

在 foo 'baz 3 中设置/任何

但这不起作用，因为表达式 in foo 'baz失败，因为没有字 'baz在 foo 中定义语境。

我应该补充一点，我意识到这样做的一种方法如下:

foo 原型(prototype):[bar:3]
foo:上下文 foo 原型(prototype)
foo: 上下文头附加 foo-prototype [baz: 3]

但是如果您无权访问 foo 怎么办？的原型(prototype) block ？

Answer 1

您可以通过使用现有对象作为原型(prototype)来创建新对象来实现相同的目的。

>> foo: make object! [bar: 3]
>> foo: make foo [baz: 3]
>> probe foo
make object! [
    bar: 3
    baz: 3
]