
  CONST
    duc$dft_cw = 0,
    duc$dft_max_known_pointer_words = dsc$dftb_rpw_dft_secondary,
    duc$dft_max_mdb_buffers = 3;

  TYPE
    dut$dft_buffer = RECORD
      cell_p: ^cell,
      size: dst$dftb_element_size,
      used: boolean,
    RECEND,

    dut$dft_data = RECORD
      revision_level: dst$dftb_cw_revision_level,
      mrb_length: dst$dftb_structure_length,
      actual_number_of_pointer_words: dst$dftb_cw_pointer_words,
      number_of_pointer_words: dst$dftb_cw_pointer_words,
      buffer: ARRAY [0 .. duc$dft_max_known_pointer_words] OF dut$dft_buffer,
      mdb: ARRAY [1 .. duc$dft_max_mdb_buffers] OF dut$dft_buffer,
    RECEND;

*copyc dst$180_dft_block
