
  PROCEDURE [XREF] clp$parse_command
    (VAR parse {input, output} : clt$parse_state;
     VAR prompting_requested: boolean;
     VAR escaped: boolean;
     VAR label: ost$name;
     VAR command_reference_parse: clt$parse_state;
     VAR file: clt$file;
     VAR form: clt$command_reference_form;
     VAR name: clt$name;
     VAR utility_command_list_entry: ^clt$command_list_entry;
     VAR separator: clt$lexical_unit_kind;
     VAR empty_command: boolean;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc clt$command_list
*copyc clt$command_reference_form
*copyc clt$file
*copyc clt$lexical_unit_kind
*copyc clt$name
*copyc clt$parse_state
*copyc ost$name
*copyc ost$status
?? POP ??
