  TYPE
    pmt$task_execution_phase = (pmc$task_executing,
          pmc$task_popping_stack_frames, pmc$task_loaded_ring_cleanup,
          pmc$task_termination_cleanup);

