src/HOL/UNITY/UNITY_tactics.ML
changeset 59498 50b60f501b05
parent 58963 26bf09b95dda
child 59755 f8d164ab0dc1
--- a/src/HOL/UNITY/UNITY_tactics.ML	Tue Feb 10 14:29:36 2015 +0100
+++ b/src/HOL/UNITY/UNITY_tactics.ML	Tue Feb 10 14:48:26 2015 +0100
@@ -21,7 +21,7 @@
       (*reduce the fancy safety properties to "constrains"*)
       REPEAT (etac @{thm Always_ConstrainsI} 1
               ORELSE
-              resolve_tac [@{thm StableI}, @{thm stableI},
+              resolve_tac ctxt [@{thm StableI}, @{thm stableI},
                            @{thm constrains_imp_Constrains}] 1),
       (*for safety, the totalize operator can be ignored*)
       simp_tac (put_simpset HOL_ss ctxt