?? NEWTITLE := 'nft$buffer_control_block' ??

{ nft$buffer_control_block }

  TYPE
    nft$buffer_control_block = record
      buffer_complete: boolean,
      command: nft$protocol_commands,
      number_parameters: nft$number_pdu_param_range,
      buffer_size: nft$parameter_12_range,
      space_left: nft$parameter_12_range,
      next_position: 1 .. nfc$command_buffer_size,
      next_buffer: ^nft$buffer_control_block,
      buffer: string (nfc$command_buffer_size),
    recend;

*copyc nfc$command_definitions
*copyc nft$protocol_commands
*copyc nft$number_pdu_param_range
*copyc nft$parameter_12_range
?? OLDTITLE ??
