DEFAULT-ORDER DEF' DEFER
DEFAULT-ORDER
* DEFAULT-ORDER ( -- )

nail the current search ORDER so that it will even
survive a trap-condition. This default-order can be
explicitly loaded with RESET-ORDER

FORTH/BASE search ordinary primitive