equal
deleted
inserted
replaced
19 (space_explode "," (Options.string options "print_mode") @ print_mode_value ()) |
19 (space_explode "," (Options.string options "print_mode") @ print_mode_value ()) |
20 |> Unsynchronized.setmp Goal.parallel_proofs (Options.int options "parallel_proofs") |
20 |> Unsynchronized.setmp Goal.parallel_proofs (Options.int options "parallel_proofs") |
21 |> Unsynchronized.setmp Goal.parallel_proofs_threshold |
21 |> Unsynchronized.setmp Goal.parallel_proofs_threshold |
22 (Options.int options "parallel_proofs_threshold") |
22 (Options.int options "parallel_proofs_threshold") |
23 |> Unsynchronized.setmp Multithreading.trace (Options.int options "threads_trace") |
23 |> Unsynchronized.setmp Multithreading.trace (Options.int options "threads_trace") |
24 |> Unsynchronized.setmp Multithreading.max_threads (Options.int options "threads_limit") |
24 |> Unsynchronized.setmp Multithreading.max_threads (Options.int options "threads") |
25 |> Options.bool options "no_document" ? Present.no_document; |
25 |> Options.bool options "no_document" ? Present.no_document; |
26 |
26 |
27 fun build args_file = |
27 fun build args_file = |
28 let |
28 let |
29 val (save, (options, (timing, (verbose, (browser_info, (parent, |
29 val (save, (options, (timing, (verbose, (browser_info, (parent, |