diff -r 29800666e526 -r 842917225d56 src/HOL/MicroJava/J/Example.thy --- a/src/HOL/MicroJava/J/Example.thy Tue Feb 23 15:37:18 2016 +0100 +++ b/src/HOL/MicroJava/J/Example.thy Tue Feb 23 16:25:08 2016 +0100 @@ -191,7 +191,7 @@ lemma class_tprgD: "class tprg C = Some z ==> C=Object \ C=Base \ C=Ext \ C=Xcpt NP \ C=Xcpt ClassCast \ C=Xcpt OutOfMemory" apply (unfold ObjectC_def ClassCastC_def NullPointerC_def OutOfMemoryC_def BaseC_def ExtC_def class_def) -apply (auto split add: split_if_asm simp add: map_of_Cons) +apply (auto split add: if_split_asm simp add: map_of_Cons) done lemma not_class_subcls_class [elim!]: "(C, C) \ (subcls1 tprg)^+ ==> R" @@ -402,7 +402,7 @@ lemmas e = NewCI eval_evals_exec.intros -declare split_if [split del] +declare if_split [split del] declare init_vars_def [simp] c_hupd_def [simp] cast_ok_def [simp] schematic_goal exec_test: " [|new_Addr (heap (snd s0)) = (a, None)|] ==>