anchor.diff:  match_qtype(#ctx{}, _Type, #dnsxd_rr{}) -> false.
   
   match_down(#ctx{cuts = Cuts, names = Names, rr = RRs} = Q,
  -	   LastDname, [Label]) ->
  +	   LastDname, [RawLabel]) ->
  +    Label = escape_label(RawLabel),
       LabelSize = byte_size(Label),
       Name = <<Label:LabelSize/binary, $., LastDname/binary>>,
       WName = <<"*.", LastDname/binary>>,
  
positive.code:     end.
  
  join_labels(Labels) ->
      <<$., Dname/binary>> = << <<$., L/binary>> || L <- Labels >>,
      Dname.
  
  build_cuts(ZoneName, RRs) -> build_cuts(ZoneName, RRs, []).
  
  
negative.code: 	false -> nomatch
      end;
  match_down(#ctx{cuts = Cuts, names = Names, rr = RRs} = Q, LastDname,
  	   [RawLabel|Labels]) ->
      Label = escape_label(RawLabel),
      LabelSize = byte_size(Label),
      Name = <<Label:LabelSize/binary, $., LastDname/binary>>,
      NameIsCut = lists:member(Name, Cuts),
  