  PROCEDURE [XREF] ocp$build_code_sec_directory (object_library: ^ SEQ (*);
    VAR code_section_directory: ^oct$code_section_directory;
    VAR module_code_sections: ^oct$module_code_sections);

?? PUSH (LISTEXT := ON) ??
*copyc oct$code_section_directory
?? POP ??


