anchor.diff:  	    _ ->
   		"?" ++ Query
   	end.
  +
  +
  +
  +test_url(S, Url) ->
  +    Url = parse(S),
  +    S = string(Url),
  +    ok.
  +
  +test() ->
  +    % Empty path
  +    {http, "spaceboyz.net", 80, "/", false} = parse("http://spaceboyz.net"),
  +    % Smoke
  +    test_url("http://spaceboyz.net/", {http, "spaceboyz.net", 80, "/", false}).
  
positive.code: 	    {C2, S3} = parse_path(S2),
  	    {[C | C2], S3}
      end.
         
  string({Proto, Host, Port, Path, Query}) ->
      if
  
negative.code: -module(url).
  -export([parse/1, string/1, test/0]).
  
  % -> {Proto,Host,Port,Path,Query}
  %  | {error}
  