src/HOL/MicroJava/Comp/CorrCompTp.thy
changeset 62390 842917225d56
parent 62042 6c6ccf573479
child 67443 3abf6a722518
--- a/src/HOL/MicroJava/Comp/CorrCompTp.thy	Tue Feb 23 15:37:18 2016 +0100
+++ b/src/HOL/MicroJava/Comp/CorrCompTp.thy	Tue Feb 23 16:25:08 2016 +0100
@@ -115,7 +115,7 @@
    apply (drule_tac x=kr in spec)
    apply (simp only: rev.simps)
    apply (subgoal_tac "(empty(rev kr @ [k'][\<mapsto>]rev xs @ [a])) = empty (rev kr[\<mapsto>]rev xs)([k'][\<mapsto>][a])")
-    apply (simp split:split_if_asm)
+    apply (simp split:if_split_asm)
    apply (simp add: map_upds_append [symmetric])
   apply (case_tac ks)
    apply auto