
  TYPE
    jmt$dispatching_control= ARRAY [jmt$dispatching_control_index] OF
          jmt$dispatching_controls,

    jmt$dispatching_controls = RECORD
      set_defined: boolean,
      dispatching_priority: jmt$dispatching_priority,
      service_limit: ost$free_running_clock, { microseconds
      dispatching_timeslice: jmt$time_slice_values,
    RECEND;

{ The following constants define the range of values permitted on SCL
{ parameter definitions and the internal representation for the keyword,
{ UNLIMITED, for the service limit element of the record.  Service limit
{ has a unit of microseconds internally but is specified in milliseconds
{ externally.

  CONST
*IF $true(osv$unix)
    jmc$dc_maximum_service_limit = 7fffffff(16), { microseconds
    jmc$highest_service_limit = 7fffffff(16), { microseconds
*ELSE
    jmc$dc_maximum_service_limit = 0ffffffffffff(16), { microseconds
    jmc$highest_service_limit = 3600000000, { microseconds
*IFEND
    jmc$lowest_service_limit = 1000; { microseconds

  TYPE
    jmt$time_slice_values = RECORD
      minor: jmt$task_time_slice,
      major: jmt$task_time_slice,
    RECEND;

*copyc jmt$dispatching_control_index
*copyc jmt$dispatching_priority
*copyc jmt$task_time_slice
*copyc ost$free_running_clock

