?STACK ?PAIRS ?STOP
?STACK
* ?STACK ( -- )

check all stacks for underflow and overflow conditions,
and if such an error condition is detected THROW

tools_misc ordinary primitive