anchor.diff:  %%                                answers = answers(),
   %%                                authority = authority(),
   %%                                additional = additional()}.
  +%%
   %% <ul>
   %% <li>qr - Query Response</li>
   %% <li>oc - Opcode</li>
  
positive.code: %%                 integer()
  %%
  %% @type message_id() = integer()
  -record(dns_message, {id = dns:random_id(),
  		      qr = false,
  		      oc = 'query',
  
negative.code: 		      answers = [],
  		      authority = [],
  		      additional=[] }).
  
  -record(dns_query, {name, class = in, type}).
  
  -record(dns_rr, {name, class = in, type, ttl = 0, data}).
  -record(dns_rrdata_a, {ip}).
  -record(dns_rrdata_aaaa, {ip}).
  -record(dns_rrdata_afsdb, {subtype, hostname}).
  -record(dns_rrdata_cert, {type, key_tag, alg, cert}).
  -record(dns_rrdata_cname, {dname}).
  -record(dns_rrdata_dhcid, {data}).
  -record(dns_rrdata_dlv, {keytag, alg, digest_type, digest}).
  -record(dns_rrdata_dname, {dname}).
  -record(dns_rrdata_dnskey, {flags, protocol, alg, public_key, key_tag}).
  -record(dns_rrdata_ds, {keytag, alg, digest_type, digest}).
  -record(dns_rrdata_hinfo, {cpu, os}).
  -record(dns_rrdata_ipseckey, {precedence,
  			      alg,
  			      gateway_type,
  			      gateway,
  			      public_key}).
  -record(dns_rrdata_isdn, {address, subaddress}).
  -record(dns_rrdata_key, {type, xt, name_type, sig, protocol, alg, public_key}).
  -record(dns_rrdata_kx, {preference, exchange}).
  -record(dns_rrdata_loc, {size, horiz, vert, lat, lon, alt}).
  -record(dns_rrdata_mb, {madname}).
  -record(dns_rrdata_md, {madname}).
  