1.1 --- a/src/Pure/System/build.ML Tue Jul 24 12:28:20 2012 +0200
1.2 +++ b/src/Pure/System/build.ML Tue Jul 24 12:38:33 2012 +0200
1.3 @@ -24,7 +24,8 @@
1.4 (Options.int options "parallel_proofs_threshold")
1.5 |> Unsynchronized.setmp Multithreading.trace (Options.int options "threads_trace")
1.6 |> Unsynchronized.setmp Multithreading.max_threads (Options.int options "threads")
1.7 - |> Options.bool options "no_document" ? Present.no_document
1.8 + |> (case Options.string options "document" of "" => false | "false" => false | _ => true) ?
1.9 + Present.no_document
1.10 |> Unsynchronized.setmp quick_and_dirty (Options.bool options "quick_and_dirty");
1.11
1.12 fun use_theories (options, thys) =