
  PROCEDURE [XREF] tmp$get_monitor_fault (fault_index: tmt$monitor_fault_buffers;
    VAR fault: ost$monitor_fault;
    VAR fault_status: tmt$fault_status);

?? PUSH (LISTEXT := ON) ??
*copyc TMT$MONITOR_FAULT_BUFFER
*copyc OST$MONITOR_FAULT
*copyc TMT$FAULT_STATUS
?? POP ??
