
  PROCEDURE [XREF] pmp$find_task_xcb (task_id: pmt$task_id;
    VAR xcb: ^ost$execution_control_block);
?? PUSH (LISTEXT := ON) ??
*copyc PMT$TASK_ID
*copyc OST$EXECUTION_CONTROL_BLOCK
?? POP ??
