Drop the chunk size when gathering lint warnings

To try and bring the peak memory usage down.
This commit is contained in:
Christopher Baines 2022-11-14 09:26:59 +00:00
parent ab7df4c6e5
commit cc61bb5f13

View file

@ -648,7 +648,7 @@ WHERE job_id = $1")
(with-time-logging (simple-format #f "getting ~A lint warnings"
name)
(let loop ((packages-chunks
(chunk packages 4000))
(chunk packages 3000))
(warnings '()))
(if (null? packages-chunks)