testmacro ( a b -- )

Vocabulary

tools.coverage.testvocab

Inputs

a	an object
b	an object

Outputs

None

Definition

USING: kernel math ;

IN: tools.coverage.testvocab

: testmacro ( a b -- )
    { [ 2dup ] [ <= [ ] [ ] if ] [ > [ ] [ ] if ] } mconcat ;