src/Pure/System/build.ML
changeset 48460 20170ae271a5
parent 48459 375e45df6fdf
child 48461 96c1ef26aabe
equal deleted inserted replaced
48459:375e45df6fdf 48460:20170ae271a5
    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,