rebol - 如何访问 REBOL 标头？

Question

假设我在另一个文件 ( imported.r) 中有一个 REBOL 脚本，如下所示：

雷博尔 [
    作者：{格雷格}
    标题：{很棒的 REBOL 代码}
]
×：3

如何将此文件导入另一个脚本并访问 REBOL 标头的内容？我知道，load/header但我似乎无能为力。

imported: context load/header %imported.r

我现在该怎么做才能访问imported.ras的标头object!？

Answer 1

LOAD/HEADER 为您提供了一段代码，正如您可以通过 PROBEing 它返回的内容看到的那样。它包含用于构建标头对象的未评估源，然后是脚本的其余部分。

做一个对象！从该标头代码中，一种方法是

>> set [header script] do/next load/header %imported.r
>> header/title 
== "Some script title"

或者，如果您只需要标头对象，只需

>> header: first do/next load/header %imported.r
>> header/title 
== "Some script title"

这使您可以通过 HEADER 和 SCRIPT 块中的脚本代码访问对象，因为 DO/NEXT 仅评估第一个表达式并返回表达式的结果以及该评估后代码块中的位置。