
  CONST
    nac$gt_null = 0,
    nac$gt_checksum = 1,
    nac$gt_expedited_data = 2,
    nac$gt_quality_of_service = 3;

  TYPE
    nat$gt_connection_option = record
      case kind: nat$gt_connection_option_kind of
      = nac$gt_checksum =
        checksum: boolean,
      = nac$gt_expedited_data =
        expedited_data: boolean,
      = nac$gt_quality_of_service =
        quality_of_service: ^SEQ ( * ),
      casend,
    recend,

    nat$gt_connection_option_kind = 0 .. 0ff(16),

    nat$gt_connection_options = array [1 .. * ] of nat$gt_connection_option;

