diff --git a/lib/build.ml b/lib/build.ml
index a6d5cd72..ea18b38b 100644
--- a/lib/build.ml
+++ b/lib/build.ml
@@ -120,7 +120,7 @@ module Op = struct
 
   module Outcome = Current.String
 
-  let lwt_pool = Lwt_pool.create 125 (fun () -> Lwt.return_unit)
+  let lwt_pool = Lwt_pool.create 1000 (fun () -> Lwt.return_unit)
 
   let run { connection; timeout} job { Key.pool; commit; variant; ty } { Value.base; master } =
     Lwt_pool.use lwt_pool @@ fun () ->