anchor.diff:  	_ -> undefined
       end.
   
  +%% @private
  +decode_alg(Int) when is_integer(Int) ->
  +    term_or_arg(fun alg_to_atom/1, Int);
  +decode_alg(Atom) when is_atom(Atom) -> Atom.
  +
  +%% @private
  +encode_alg(Int) when is_integer(Int) -> Int;
  +encode_alg(Atom) when is_atom(Atom) ->
  +    int_or_badarg(fun alg_to_int/1, Atom).
  +
   %% @doc Returns the atom representation of a DNS algorithm integer.
   %% @spec alg_to_atom(Alg :: integer()) -> atom() | undefined
   alg_to_atom(Int) when is_integer(Int) ->
  
positive.code: %%%===================================================================
  
  -define(CLASS_IS_IN(Term), (Term =:= in orelse Term =:= none)).
  
  decode_rrdata(Class, a, <<A, B, C, D>>, _MsgBin) when ?CLASS_IS_IN(Class) ->
      IP = inet_parse:ntoa({A,B,C,D}),
  
negative.code: -export([alg_to_atom/1, alg_to_int/1]).
  
  -export([const_compare/2]).
  
  %% Private
  -export([encode_rrdata/2, decode_rrdata/3]).
  -export([encode_dname/1]).
  -export([decode_class/1, encode_class/1]).
  -export([decode_type/1, encode_type/1]).
  -export([decode_alg/1, encode_alg/1]).
  
  -include("dns.hrl").
  -include("dns_tests.hrl").
  