anchor.diff:        | LightOff ->
           if p = LightOff
           then Options.set_ml_ish();
  -        [se], env, []
  +        [se], []
         | SetOptions o ->
           set_options Options.Set o;
  -        [se], env, []
  +        [se], []
         | ResetOptions sopt ->
           Options.restore_cmd_line_options false |> ignore;
           let _ = match sopt with
             | None -> ()
             | Some s -> set_options Options.Reset s
           in
  -        env.solver.refresh();
  -        [se], env, []
  +        [se], []
       end
   
   
  
positive.code:           Sig_declare_typ((right lb.lbname).fv_name.v, lb.lbunivs, lb.lbtyp, Assumption::quals, r)), hidden
      else [se], hidden
  
  let tc_decls env ses =
    let rec process_one_decl (ses, exports, env, hidden) se =
      if Env.debug env Options.Low
      then BU.print1 ">>>>>>>>>>>>>>Checking top-level decl %s\n" (Print.sigelt_to_string se);
  
      let ses', env, ses_elaborated = tc_decl env se  in
  
      if (Options.log_types()) || Env.debug env <| Options.Other "LogTypes"
      then BU.print1 "Checked: %s\n" (List.fold_left (fun s se -> s ^ Print.sigelt_to_string se ^ "\n") "" ses');
  
negative.code:                                   (List.length uvs |> BU.string_of_int)
                                    (Print.term_to_string t), r)));
      let se = Sig_effect_abbrev(lid, uvs, tps, c, tags, flags, r) in
      [se], []
  
    | Sig_declare_typ (_, _, _, quals, _)
    | Sig_let (_, _, _, quals, _)
        when quals |> BU.for_some (function OnlyName -> true | _ -> false) ->
        (* Dummy declaration which must be erased since it has been elaborated somewhere else *)
        [], []
  
    | Sig_declare_typ(lid, uvs, t, quals, r) -> //NS: No checks on the qualifiers?
      let env = Env.set_range env r in
  