
  PROCEDURE [XREF] tmp$set_task_ready (task_id: ost$global_task_id;
        readying_task_priority: jmt$dispatching_priority;
        ready_condition: tmt$ready_condition);

?? PUSH (LISTEXT := ON) ??
*copyc JMT$DISPATCHING_PRIORITY
*copyc OST$GLOBAL_TASK_ID
*copyc TMT$TASK_STATUS
?? POP ??
