<operation> ( predicate command -- operation )


Vocabulary
ui.operations

Inputs
predicatean object
commandan object


Outputs
operationan object


Definition
USING: accessors kernel ;

IN: ui.operations

: <operation> ( predicate command -- operation )
operation new [ ] >>translator swap >>command
swap >>predicate ;