red - 从 Red/System 访问运行时函数

Question

因此，在尝试在 Red 和 Red/System 之间来回编码值时出现了问题。我想访问传递给例程的对象的内脏。

我注意到 Red Runtime 中有一些函数可以在对象上下文中处理诸如此类、get-values、get-words 等内容。运行时源中有一个名为 object.reds 的文件。

我如何利用这些？我可以使用这些吗？有没有办法访问它们而无需重新包含(并通过扩展编译)(已包含的)运行时的副本到我的应用程序中？

Answer 1

您可以立即从 Red/System 例程中调用它们。不需要额外的包含。下面是一个简短的例子:

Red []

get-object-size: routine [
    obj [object!]
    return: [integer!]
] [
    object/get-size obj
]

print get-object-size object [foo: 42 bar: 99]

当你编译并运行它时，它最终会输出 2 .