clear-stack ( listener -- )

Vocabulary

ui.tools.listener

Inputs

listener

an object

Outputs

None

Definition

USING: kernel ;

IN: ui.tools.listener

: clear-stack ( listener -- )
    [ [ clear ] \ clear ] dip (call-listener) ;