anchor.diff:      ClientFun = fun (Socket) ->
                           Req = fake_request(Socket, ContentType,
                                              size(BinContent)),
  -                        Res = parse_form(Req, fun handler_test/2),
  +                        Res = parse_form(Req),
                           [{"submit-name", "Larry"},
                            {"files", {"file1.txt", {"text/plain",[]},
                                       <<"... contents of file1.txt ...">>}
  
positive.code: parse_form_file({body, Data}, {Name, Handler}, FileHandler, State) ->
      H1 = Handler(Data),
      fun (Next) -> parse_form_file(Next, {Name, H1}, FileHandler, State) end.
  
  parse_multipart_request(Req, Callback) ->
      %% TODO: Support chunked?
  
negative.code:     ok = with_socket_server(ServerFun, ClientFun),
      ok.
  
  test_parse_form() ->
      ContentType = "multipart/form-data; boundary=AaB03x",
      "AaB03x" = get_boundary(ContentType),
  