factor-lang - 将引用保留为 Factor 中的元组成员

Question

我想将引用保留为 Factor 中元组的成员。但是，当我尝试对其执行“调用”时，出现错误“无法将调用应用于运行时计算值”。请注意，将函数标记为“内联”不会执行任何操作。

示例代码:

USING: accessors kernel ;
IN: stackoverflow

TUPLE: quottuple quot ;
C: <quottuple> quottuple

: call-quot ( quottuple -- result )
    quot>> call ; inline

: main ( -- )
    [ 1 ] <quottuple>
    call-quot drop ;

MAIN: main

Answer 1

答案是“call(”一词。该词要求您指定引用的堆栈效果，但因此不需要在编译时知道引用。

USING: accessors kernel ;
IN: stackoverflow

TUPLE: quottuple quot ;
C: <quottuple> quottuple

: call-quot ( quottuple -- result )
    quot>> call( -- result ) ;

: main ( -- )
    [ 1 ] <quottuple>
    call-quot drop ;

MAIN: main