Сохранение котировок как членов кортежа в Факторе

Question

Я хочу сохранить цитату в качестве члена кортежа в Factor. Но когда я пытаюсь выполнить «вызов» на нем, я получаю сообщение об ошибке «не может применить вызов к вычисленному значению времени выполнения». Обратите внимание, что обозначение функций как «inline» ничего не делает.

Пример кода:

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

Ответ является «вызов (» слово Это слово требует указания стека эффект котировки, но в результате котировки не должны быть известны. во время компиляции.

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