eof

edwintorok · Jul 11, 2023 · 79c6d62 · 79c6d62
1 parent a06b016
commit 79c6d62
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/ocaml/loadgen/speculative.ml b/ocaml/loadgen/speculative.ml
@@ -173,7 +173,6 @@ let fastpath_handle_event mux fd events t =
   if Polly.Events.(test events inp) then (
     Connection.receive conn ;
     if Zero_http.Zero_buffer.is_eof conn.zb then begin
-      prerr_endline "EOF";
       Connection.disconnect conn ;
       do_disconnect t mux conn
     end
@@ -208,9 +207,9 @@ let build_conntable connections =
     connections ;
   conntbl
 
-let repeat = 30
+let repeat = 100
 
-let nconn = 1
+let nconn = 100
 
 let run ?(receive_buffer_size = 16384) t =
   let connections = List.length t.connections in

diff --git a/ocaml/loadgen/zero_http/zero_buffer.ml b/ocaml/loadgen/zero_http/zero_buffer.ml
@@ -92,6 +92,7 @@ let refill t reader input =
   if not t.eof then
   let producer = t.producer in
   let len = View.size producer in
+  if len > 0 then
   let nread = reader input ~off:producer.start ~len t.buf in
   if nread = 0 then t.eof <- true
   else if nread > 0 then begin