  PROCEDURE [XREF] mmp$check_io_status
    (    status_pointer_array: mmt$io_status_pointer_array;
         wait_time: integer;
     VAR index: integer;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc ost$status
*copyc mmt$io_status
?? POP ??
