
  PROCEDURE [XREF] clp$evaluate_command_reference
    (VAR parse {input, output} : clt$parse_state;
     VAR work_area {input, output} : ^clt$work_area;
         get_path_handle_name: boolean;
     VAR path_handle_name: fst$path_handle_name;
     VAR command_reference: clt$command_reference;
     VAR utility_command_list_entry: ^clt$command_list_entry;
     VAR parameter_name: clt$parameter_name;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc clt$command_list
*copyc clt$command_reference
*copyc clt$parameter_name
*copyc clt$parse_state
*copyc clt$work_area
*copyc fst$path_handle_name
?? POP ??
