?PAIRS
* ?PAIRS ( a b -- )

if compiling, check that the two magics on
the CS-STACK are identical, otherwise throw

used in control-words

tools_misc ordinary primitive