
  TYPE
    tmt$rb_cycle = record
      reqcode: ALIGNED [0 MOD 8] syt$monitor_request_code,
      code: tmc$cycle_reason,
      p1: ^cell,
      p2: ^cell,
      lock_value: integer,
    recend,

    tmc$cycle_reason = (tmc$cyc_cycle_request, tmc$cyc_set_job_lock,
          tmc$cyc_set_sys_lock, tmc$cyc_clear_sys_lock, tmc$cyc_tstset_sys_lock,
          tmc$cyc_cause_task_switch, tmc$cyc_end_system_activity, tmc$cyc_sypcycle,
          tmc$cyc_mtr_end_sys_activity, tmc$cyc_set_fde_lock);

*copyc SYT$MONITOR_REQUEST_CODE
*copyc SYC$MONITOR_REQUEST_CODES
