anchor.diff:                                    ["quux","no"], 82, ["d"], 0, RD)).
   
   try_host_binding_fullmatch_test() ->
  -    RD = ignored,
  +    RD = testing,
       Dispatch = [{{["foo","bar"],80},[{["a"],x,y}]},
                   {{[foo,"bar"],80},  [{["b"],z,q}]},
                   {{[foo,"bar"],baz}, [{["c"],r,s}]},
  
positive.code:                                   ["quux","baz"], 1234, ["b"], 0, RD)).
  
  try_host_binding_noport_test() ->
      RD = ignored,
      Dispatch = [{["foo","bar"], [{["a"],x,y}]},
                  {["baz","quux"],[{["b"],z,q}]},
                  {[m,"quux"],    [{["c"],r,s}]},
  
negative.code:         {ok, PortBindings} ->
              case bind(lists:reverse(HostSpec), Host, PortBindings, 0) of
                  {ok, HostRemainder, HostBindings, _} ->
                      case try_path_binding(PathSpec, Path, HostRemainder, Port, HostBindings, Depth, RD) of
                          {Mod, Props, PathRemainder, PathBindings,
                           AppRoot, StringPath} ->
                              {Mod, Props, HostRemainder, Port, PathRemainder,
  