proc>quot2 ( proc -- quot: ( registers gml value1 value2 -- registers gml ) )

Vocabulary

gml.core

Inputs

proc

an object

Outputs

quot	a quotation with stack effect ( registers gml value1 value2 -- registers gml )

Definition

USING: gml.runtime kernel ;

IN: gml.core

: proc>quot2
    ( proc -- quot: ( registers gml value1 value2 -- registers gml ) )
    '[ [ over push-operand ] bi@ _ exec-proc ] ; inline