anchor.diff:                fun(T) ->
                         case catch erl_syntax_lib:analyze_function(T) of
                             {format_error, 1} -> true;
  +			  {io_format_error, 1} -> true;
                             {dec_int, 3} -> true;
                             {dec_int, 1} -> true;
                             {dec_enum, 2} -> true;
  
positive.code: %% Generator API
  -export([compile/1, compile/2]).
  %% Runtime API
  -export([format_error/1, get_attr/2]).
  %% Runtime built-in decoders/encoders
  -export([dec_int/1, dec_int/3, dec_enum/2, enc_int/1, enc_enum/1, not_empty/1,
  	enc_xmlns_attrs/2, choose_top_xmlns/3]).
  
negative.code:       "/> qualified by namespace '", XMLNS/binary, "'">>;
  format_error({missing_tag_xmlns, Tag}) ->
      <<"Missing namespace for tag <", Tag/binary, "/>">>.
  
  io_format_error({bad_attr_value, Attr, Tag, XMLNS}) ->
      {<<"Bad value of attribute '~s' in tag <~s/> qualified by namespace '~s'">>,
       [Attr, Tag, XMLNS]};
  io_format_error({bad_cdata_value, <<>>, Tag, XMLNS}) ->
      {<<"Bad value of cdata in tag <~s/> qualified by namespace '~s'">>,
       [Tag, XMLNS]};
  io_format_error({missing_tag, Tag, XMLNS}) ->
      {<<"Missing tag <~s/> qualified by namespace '~s'">>, [Tag, XMLNS]};
  io_format_error({missing_attr, Attr, Tag, XMLNS}) ->
      {<<"Missing attribute '~s' in tag <~s/> qualified by namespace '~s'">>,
       [Attr, Tag, XMLNS]};
  io_format_error({missing_cdata, <<>>, Tag, XMLNS}) ->
      {<<"Missing cdata in tag <~s/> qualified by namespace '~s'">>,
       [Tag, XMLNS]};
  io_format_error({unknown_tag, Tag, XMLNS}) ->
      {<<"Unknown tag <~s/> qualified by namespace '~s'">>, [Tag, XMLNS]};
  io_format_error({missing_tag_xmlns, Tag}) ->
      {<<"Missing namespace for tag <~s/>">>, [Tag]}.
  
  get_attr(Attr, Attrs) ->
      case lists:keyfind(Attr, 1, Attrs) of
  