# HG changeset patch # User ballarin # Date 1520000099 -3600 # Node ID 6306bd5829576d2b862181d4b175191d1f647211 # Parent d5a7f2c5465552d67c7ba51c021f21235aaa0a2a Drop illegitimate optimisation from d5a7f2c54655. diff -r d5a7f2c54655 -r 6306bd582957 src/Pure/Isar/expression.ML --- a/src/Pure/Isar/expression.ML Fri Mar 02 14:28:39 2018 +0100 +++ b/src/Pure/Isar/expression.ML Fri Mar 02 15:14:59 2018 +0100 @@ -407,8 +407,7 @@ |> Variable.export_terms ctxt' ctxt |> Element.eq_term_morphism (Proof_Context.theory_of ctxt) |> the_default Morphism.identity; - val ctxt'' = if null eqns then ctxt' else - Locale.activate_declarations (loc, inst_morph $> rewrite_morph) ctxt; + val ctxt'' = Locale.activate_declarations (loc, inst_morph $> rewrite_morph) ctxt; val eqnss' = eqnss @ [attrss ~~ Variable.export_terms ctxt' ctxt eqns']; in (i + 1, insts', eqnss', ctxt'') end;