callback-stack-cleanup ( params -- )

Vocabulary

compiler.cfg.builder.alien

Inputs

params

an object

Outputs

None

Definition

USING: accessors compiler.cfg.builder.alien.params
cpu.architecture kernel namespaces words ;

IN: compiler.cfg.builder.alien

: callback-stack-cleanup ( params -- )
    [ xt>> ] [
        [ stack-params get ] dip [ return>> ] [ abi>> ] bi
        stack-cleanup
    ] bi "stack-cleanup" set-word-prop ;