Measure changed-key work on large collections

This commit is contained in:
sneeker committed 2017-06-22 12:11:00 +00:00
1 parent abe98c29fb
commit 39dd21eee2
6 files changed
+252 -7

No files matched your search

+5 -1
View File
@@ -659,7 +659,11 @@ let generated_differential_case seed_count batch_count =
let updates_path = Filename.concat dir (Printf.sprintf "updates_%d.sexp" seed) in
write_entries input_path entries;
write_batches updates_path batches;
(match run [ executable; "--input"; input_path; "--updates"; updates_path; "--trace"; "--print-result" ] with
(match run
[
executable; "--input"; input_path; "--updates"; updates_path; "--trace";
"--verify"; "--print-result";
] with
| Unix.WEXITED 0, output ->
let lines = List.filter (fun line -> line <> "") (String.split_on_char '\n' output) in
if List.length lines <> List.length expected then