anchor.diff:                            {Acc1, Acc2}
                     end
             end, {[], []}, TaggedSpecs),
  -    XmlElClause = erl_syntax:clause(
  -		    [?AST(xmlel), ?AST(3)],
  -		    none,
  -		    [?AST([name, attrs, children])]),
  -    [erl_syntax:function(?AST(pp), Clauses1 ++ [XmlElClause, PassClause1]),
  +    [erl_syntax:function(?AST(pp), Clauses1 ++ PassClause1),
        make_function(records, [],
   		   [erl_syntax:list(
   		      lists:map(
  
positive.code:     end.
  
  make_printer(TaggedSpecs, PredefRecords, ModName, ParentMod) ->
      PassClause1 = erl_syntax:clause(
  		    [?AST(Name), ?AST(Arity)],
  		    none,
  		    [erl_syntax:case_expr(
  		       ?AST('?a(ParentMod)':get_mod(
  			      erlang:make_tuple(Arity+1, undefined, [{1, Name}]))),
  		       [erl_syntax:clause(
  			  [?AST(undefined)], none, [?AST(no)]),
  			erl_syntax:clause(
  			  [?AST(Mod)],
  			  none,
  			  [?AST(Mod:pp(Name, Arity))])])]),
      %% Exclude tags with duplicated results
      RecNames = lists:foldl(
                   fun({Tag, #elem{result = Result, module = Mod}}, Acc)
  
negative.code: 		none,
  		[?AST(Mod = get_mod(El)),
  		 ?AST(Mod:do_encode(El, TopXMLNS))]),
      [make_function(encode, [?AST(El)], [?AST(encode(El, <<>>))]),
       erl_syntax:function(?AST(encode), [Clause1, Clause2]),
       make_function(get_name, [?AST(El)], GetNameCase),
  