Read/write more files to be sure we reach the max of open files

mirage · Dec 19, 2014 · 290d03f · 290d03f
1 parent cc8d307
commit 290d03f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib_test/test_store.ml b/lib_test/test_store.ml
@@ -390,7 +390,7 @@ let test_read_writes () =
         read (i-1)
     in
     write 1
-    >>= fun () -> Lwt.join [ write 100; read 100; write 100; read 100; ]
+    >>= fun () -> Lwt.join [ write 500; read 1000; write 1000; read 500; ]
   end
 
 let suite (speed, x) =