diff --git a/tests/multipart_form/t1.expected b/tests/multipart_form/t1.expected index e69de29b..9591feee 100644 --- a/tests/multipart_form/t1.expected +++ b/tests/multipart_form/t1.expected @@ -0,0 +1,25 @@ +T1 +chunk "hello" +delim +chunk "\n world\n what is the meaning of" +delim +chunk "this??" +delim +chunk "ok ok ok" +delim +T2 +delim +delim +chunk "ah bon" +delim +chunk "aight" +delim +delim +T3 +delim +chunk "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa" +delim +delim +chunk "bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb" +delim +chunk "cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc" diff --git a/tests/multipart_form/t1.ml b/tests/multipart_form/t1.ml index f68edec6..221bde28 100644 --- a/tests/multipart_form/t1.ml +++ b/tests/multipart_form/t1.ml @@ -1,5 +1,6 @@ module MFD = Tiny_httpd_multipart_form_data +let spf = Printf.sprintf let pf = Printf.printf let read_stream (st : MFD.st) : _ list = @@ -42,4 +43,8 @@ let () = what is the meaning of--YOLOthis??--YOLOok ok ok--YOLO|}; pf "T2\n"; test "--YOLO--YOLOah bon--YOLOaight--YOLO--YOLO"; + pf "T3\n"; + test + (spf "--YOLO%s--YOLO--YOLO%s--YOLO%s" (String.make 400 'a') + (String.make 400 'b') (String.make 400 'c')); ()