match-choose ( alist -- quot )

Vocabulary

compiler.tree.debugger

Inputs

alist

an object

Outputs

quot

an object

Definition

USING: assocs kernel match ;

IN: compiler.tree.debugger

MACRO: match-choose ( alist -- quot )
    [ [ ] curry ] assoc-map [ match-cond ] curry ;