ALIAS
* ALIAS ( xt "name" -- )

create a defer word that is initialized with the given x-token.

useful ordinary primitive