
  PROCEDURE [XREF] clp$scan_proc_declaration ALIAS 'clpspd'
    (    input_type: clt$proc_input_type;
         get_line: clt$proc_input_procedure;
     VAR proc_name_area: SEQ ( * );
     VAR parameter_name_area: SEQ ( * );
     VAR parameter_area: SEQ ( * );
     VAR symbolic_parameter_area: SEQ ( * );
     VAR extra_info_area: SEQ ( * );
     VAR proc_names: ^clt$proc_names;
     VAR pdt: clt$parameter_descriptor_table;
     VAR symbolic_parameters: ^clt$symbolic_parameters;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc cld$proc_declaration
*copyc cle$ecc_expression
*copyc cle$ecc_expression_result
*copyc cle$ecc_file_reference
*copyc cle$ecc_function_processing
*copyc cle$ecc_lexical
*copyc cle$ecc_proc_declaration
*copyc cle$ecc_variable
*copyc clt$parameter_descriptor_table
*copyc ost$status
?? POP ??
