{  Define the various swapping events.

  CONST
    jsc$se_immediate = 0,
    jsc$se_polling = 1000000; {1 second interval}

  TYPE
    jst$swapping_event = jsc$se_immediate .. jsc$se_polling;
