anchor.diff:  
   make_elem_dec_fun(#elem{name = Name, result = Result, refs = Refs,
                           cdata = CData, attrs = Attrs, xmlns = XMLNS},
  -                  Tag, AllElems, Types) ->
  +                  Tag, AllElems, Types, ModName) ->
       FunName = make_dec_fun_name([Tag]),
       ResultWithVars = subst_labels(Result),
       AttrVars = lists:map(
  
positive.code:                           erl_syntax:variable("_els")])],
         ElCDataMatch ++ AttrMatch ++ [ResultWithVars])]
          ++ make_els_dec_fun(FunName ++ "_els", CData, HaveCData, SubElVars,
                              Refs, Tag, XMLNS, AllElems, Result, Types)
          ++ make_attrs_dec_fun(FunName ++ "_attrs", Attrs, Tag).
  
  make_els_dec_clause(FunName, CDataVars, Refs, TopXMLNS, AllElems,
  
negative.code:                                 NSGuard
                          end,
                NewElemVars = lists:map(
                                fun({L, [#ref{min = Min, max = 1}|_]})
                                      when L == Label ->
                                        Call = make_function_call(
                                                 make_dec_fun_name([RefName]),
                                                 [erl_syntax:variable("_el")]),
                                        if Min == 0 ->
                                                Call;
                                           Min == 1 ->
                                                erl_syntax:tuple(
                                                  [erl_syntax:atom("value"),
                                                   Call])
                                        end;
                                   ({L, [#ref{default = Def}]}) when L == Label ->
                                        RefType = dict:fetch(RefName, Types),
                                        case is_subtype(Def, RefType) of
  