
  TYPE
    oct$segment = 0 .. occ$null_seg_value;

  CONST
    occ$null_seg_value = 0ffff(16);

