  PROCEDURE [XREF] ocp$obtain_xdcl_list
    (    changed_info: ^oct$changed_info;
         retain: boolean;
         obtain_deferred_entry_points: boolean;
     VAR module_description: oct$module_description;
     VAR xdcl_list: oct$external_declaration_list;
     VAR starting_procedure: pmt$program_name;
     VAR deferred_entry_point_list: oct$external_declaration_list;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc occ$retain
*copyc oct$changed_info
*copyc oct$external_declaration_list
*copyc oct$module_description
*copyc ost$status
*copyc pmt$program_name
?? POP ??

