  PROCEDURE [XREF] clp$delete_node_format_token
    (index: clt$token_array_index);

?? PUSH (LISTEXT := ON) ??
*copyc clt$format_token_type
?? POP ??
