src/Pure/Isar/method.ML
changeset 62889 99c7f31615c2
parent 62795 063d2f23cdf6
child 62969 9f394a16c557
--- a/src/Pure/Isar/method.ML	Wed Apr 06 14:08:57 2016 +0200
+++ b/src/Pure/Isar/method.ML	Wed Apr 06 16:33:33 2016 +0200
@@ -355,8 +355,7 @@
              ML_Lex.read_source false source);
         val tac = the_tactic context';
       in
-        fn phi =>
-          set_tactic (fn _ => Context.setmp_thread_data (SOME context) (tac phi))
+        fn phi => set_tactic (fn _ => Context.setmp_generic_context (SOME context) (tac phi))
       end)) >> (fn decl => Morphism.form (the_tactic (Morphism.form decl context))));