anchor.diff:                      (List.rev !fresh_scope)) in
       let theory = theory@[Push]@qry@[Pop] in
       let theory, used_unsat_core = filter_theory theory in
  -    let input, qhash, log_file_name = mk_input false theory in
  +    let input, qhash, log_file_name = mk_input true theory in
       if not (cache_hit log_file_name cache qhash cb) then
           enqueue ({job=z3_job log_file_name r true label_messages input qhash; callback=cb})
   
  
positive.code:   smt_labels:         option<smt_output_section>;
  }
  
  let smt_output_sections (r:Range.range) (lines:list<string>) : smt_output =
      let rec until tag lines =
          match lines with
          | [] -> None
  
negative.code: let z3_job (log_file:_) (r:Range.range) fresh (label_messages:error_labels) input qhash () : z3result =
    let start = BU.now() in
    let status, statistics =
      try doZ3Exe log_file r fresh input label_messages
      with e when not (Options.trace_error()) ->
           (!bg_z3_proc).refresh();
           raise e
  