  PROCEDURE [XREF] ocp$generate_metapatch (old_object_library: amt$local_file_name;
        new_object_library: amt$local_file_name;
    VAR corrector: ^SEQ ( * );
    VAR size: oct$corrector_size;
    VAR status: ost$status);

*copyc amt$local_file_name
*copyc oct$corrector
*copyc ost$status

