fix(main): method for measuring memory overhead was wrong

This commit is contained in:
Simon Cruanes 2022-08-31 00:47:11 -04:00
parent 34ad038d9a
commit 52b60c4114
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4

View file

@ -166,7 +166,7 @@ let solve ?gc:_ ?restarts:_ ?proof_file ?(pp_model = false) ?(check = false)
if Sys.time () -. t1 > time then (
Log.debugf 0 (fun k -> k "timeout");
true
) else if (Gc.quick_stat ()).Gc.major_words *. 8. > memory then (
) else if float (Gc.quick_stat ()).Gc.heap_words *. 8. > memory then (
Log.debugf 0 (fun k -> k "%S" "exceeded memory limit");
true
) else