
  PROCEDURE [XREF] pmp$initiate_child_task (task_id: pmt$task_id;
    spy_identifier: pmt$spy_identifier;
    wait: ost$wait;
    VAR child_initiated: BOOLEAN);
?? PUSH (LISTEXT := ON) ??
*copyc PMT$TASK_ID
*copyc PMT$SPY_IDENTIFIER
*copyc OST$WAIT
?? POP ??
