
  PROCEDURE [XREF] clp$f_scan_token
    (    termination_option: clt$slu_termination_option;
     VAR parse: { input, output } clt$parse_state);

?? PUSH (LISTEXT := ON) ??
*copyc cle$ecc_lexical
*copyc clt$parse_state
*copyc clt$slu_termination_option
?? POP ??
