
diff -r 85fb70b0c5e8 -r 88bee9f6eec7 src/HOL/MicroJava/J/Conform.thy
--- a/src/HOL/MicroJava/J/Conform.thy	Fri May 13 16:03:03 2011 +0200
+++ b/src/HOL/MicroJava/J/Conform.thy	Fri May 13 22:55:00 2011 +0200
@@ -328,8 +328,9 @@
 apply  auto
 apply(rule hconfI)
 apply(drule conforms_heapD)
-apply(tactic {* auto_tac (HOL_cs addEs [@{thm oconf_hext}] 
-                addDs [@{thm hconfD}], @{simpset} delsimps [@{thm split_paired_All}]) *})
+apply(tactic {*
+  auto_tac (put_claset HOL_cs @{context} addEs [@{thm oconf_hext}] addDs [@{thm hconfD}]
+  |> map_simpset_local (fn ss => ss delsimps [@{thm split_paired_All}])) *})
 done
 
 lemma conforms_upd_local: 




