  PROCEDURE [XREF] mmp$lock_catalog_segment
    (    p: ^cell;
         access: mmt$lus_lock_type;
         wait: ost$wait;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc mme$condition_codes
*copyc mmt$lus_declarations
*copyc ost$status
*copyc ost$wait
?? POP ??
