src/Pure/System/isabelle_process.ML

 fun init in_fifo out_fifo = ignore (Simple_Thread.fork false (fn () =>
   let
     val _ = OS.Process.sleep (seconds 0.5);  (*yield to raw ML toplevel*)
     val _ = Output.raw_stdout Symbol.STX;
 
-    val _ = quick_and_dirty := true;  (* FIXME !? *)
+    val _ = quick_and_dirty := false;
+    val _ = Goal.parallel_proofs := 0;
     val _ = Context.set_thread_data NONE;
     val _ = Unsynchronized.change print_mode
       (fold (update op =) [isabelle_processN, Keyword.keyword_statusN, Pretty.symbolicN]);
 
     val in_stream = setup_channels in_fifo out_fifo;