
  TYPE
    nat$data_fragments = array [1 .. * ] of nat$data_fragment,
    nat$data_fragment = record
      address: ^cell,
      length: nat$data_length,
    recend,
    nat$data_fragment_count = 0 .. nac$max_data_fragment_count;

{ nac$max_data_fragment_count specifies the maximum number of
{ elements which are allowed in an array of type
{ nat$data_fragments.

  CONST
    nac$max_data_fragment_count = 255;

*copyc nat$data_length
