
  FUNCTION [INLINE] pmp$zero_ts_conditions_in_task: boolean;

?? PUSH (LISTEXT := ON) ??

    VAR
      tcb_p: ^pmt$task_control_block;

    pmp$find_executing_task_tcb (tcb_p);
    pmp$zero_ts_conditions_in_task := tcb_p^.nosve.task_condition_count = 0;
  FUNCEND pmp$zero_ts_conditions_in_task;

*copyc pmt$task_control_block
*copyc pmp$find_executing_task_tcb
?? POP ??
