1.1 --- a/src/Pure/System/build.ML	Tue Jul 24 11:02:42 2012 +0200
     1.2 +++ b/src/Pure/System/build.ML	Tue Jul 24 11:04:49 2012 +0200
     1.3 @@ -22,7 +22,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 +    |> Options.bool options "no_document" ? Present.no_document
     1.9 +    |> Unsynchronized.setmp quick_and_dirty (Options.bool options "quick_and_dirty");
    1.10  
    1.11  fun build args_file =
    1.12    let