当我尝试使用反射从另一个对象创建 rebol 对象时，为什么会出现错误

Question

>> example: make object! [
[        var1: 10
[        var2: var1 + 10
[        var3: now/time
[        set-time: does [var3: now/time]
[        calculate: func [value] [
[                var1: value
[                var2: value + 10
[            ]
[    ]
>>
>> example2: make object! third example
** Script Error: none is missing its value argument
** Near: calculate: func [value][
    var1: value
    var2: value + 10
]
>>

如何防止对第三个例子的评估？

Answer 1

最好的方法可能是使用construct/with——它基于现有对象创建一个对象。

要基于 example 对象加上一个额外字段来创建一个对象：

example2: construct/with [extra-field: 999] example

或者仅使用相同的字段来创建一个对象

example2: construct/with [] example

Answer 2

您还可以利用 Rebol 的对象原型：

example2: make example []

或者使用附加字段

example3: make example [      
  var4: now/date
  set-date: does [var4: now/date]
]

或替换字段

example4: make example [
  calculate: func [value] [
    var1: value
    var2: value + 20
  ]
]