--- a/src/HOL/MicroJava/Comp/CorrComp.thy Fri Sep 20 19:07:10 2024 +0200
+++ b/src/HOL/MicroJava/Comp/CorrComp.thy Fri Sep 20 19:51:08 2024 +0200
@@ -85,7 +85,7 @@
bytecode \<Rightarrow>
aheap \<Rightarrow> opstack \<Rightarrow> locvars \<Rightarrow>
bool"
- ("{_,_,_} \<turnstile> {_, _, _} >- _ \<rightarrow> {_, _, _}" [61,61,61,61,61,61,90,61,61,61]60) where
+ (\<open>{_,_,_} \<turnstile> {_, _, _} >- _ \<rightarrow> {_, _, _}\<close> [61,61,61,61,61,61,90,61,61,61]60) where
"{G,C,S} \<turnstile> {hp0, os0, lvars0} >- instrs \<rightarrow> {hp1, os1, lvars1} ==
\<forall>pre post frs.
(gis (gmb G C S) = pre @ instrs @ post) \<longrightarrow>