
  PROCEDURE [XREF] clp$generate_pdt
    (    command_or_function: clt$command_or_function;
         first_line: ^clt$command_line;
         first_line_index: clt$command_line_index;
         get_line: clt$input_procedure;
     VAR work_area {input, output} : ^clt$work_area;
     VAR last_line: ^clt$command_line;
     VAR last_line_index: clt$command_line_index;
     VAR command_or_function_name: pmt$program_name;
     VAR aliases: ^array [1 .. * ] of pmt$program_name;
     VAR availability: clt$named_entry_availability;
     VAR command_or_function_scope: clt$command_or_function_scope;
     VAR command_log_option: clt$command_log_option;
     VAR parameter_description_table: ^clt$parameter_description_table;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc clt$command_line
*copyc clt$command_line_index
*copyc clt$command_log_option
*copyc clt$command_or_function
*copyc clt$command_or_function_scope
*copyc clt$input_procedure
*copyc clt$named_entry_availability
*copyc clt$parameter_description_table
*copyc clt$work_area
*copyc ost$status
*copyc pmt$program_name
?? POP ??
