[osx] fix multi-process sqlite crash

Reviewed By: jvillard

Differential Revision: D12921636

fbshipit-source-id: 71d9bc417
master
Martin Trojer 6 years ago committed by Facebook Github Bot
parent 8d410d63c0
commit 448a2dcaec

@ -42,12 +42,14 @@ module Runner = struct
let create ~jobs ~f =
PerfEvent.(
log (fun logger -> log_begin_event logger ~categories:["sys"] ~name:"fork prepare" ())) ;
ResultsDatabase.db_close () ;
let pool =
ProcessPool.create ~jobs ~f
~child_prelude:
((* hack: run post-fork bookkeeping stuff by passing a dummy function to [fork_protect] *)
fork_protect ~f:(fun () -> () ))
in
ResultsDatabase.new_database_connection () ;
PerfEvent.(log (fun logger -> log_end_event logger ())) ;
pool

Loading…
Cancel
Save