>NAME
* >NAME ( cfa -- nfa )

converts a pointer to the code-field (CFA) to point
then to the corresponding name-field (NFA)
 implementation-specific simulation:
   : >NAME  >LINK L>NAME ;

header ordinary primitive