
  PROCEDURE [XREF] pmp$find_task_tcb
    (    task_id: pmt$task_id;
     VAR tcb: ^pmt$task_control_block);

?? PUSH (LISTEXT := ON) ??
*copyc pmt$task_id
*copyc pmt$task_control_block
?? POP ??
