anchor.diff:  -define(HEADER, "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n").
   
   -define(N(Arg), ecrepo_xml:format_to_bin("~b", [Arg])).
  +-define(Q(Arg), ecrepo_lib:quote(Arg)).
   
   document(RootElement) ->
       Output = elem(RootElement, 0),
  
positive.code:     Output.
  
  content2bin(Content, _) when is_binary(Content) ->
      ecrepo_lib:quote(Content);
  content2bin(Content, _) when is_number(Content) ->
      ?N(Content);
  content2bin(Content, Indent) ->
  
negative.code:             ?N(Value);
  
          is_binary(Value) ->
              ?Q(Value);
  
          true ->
              throw({badarg, Value})
  