diff -r 46f59511b7bb -r d97fdabd9e2b src/HOL/MicroJava/Comp/CorrComp.thy --- 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 \ aheap \ opstack \ locvars \ bool" - ("{_,_,_} \ {_, _, _} >- _ \ {_, _, _}" [61,61,61,61,61,61,90,61,61,61]60) where + (\{_,_,_} \ {_, _, _} >- _ \ {_, _, _}\ [61,61,61,61,61,61,90,61,61,61]60) where "{G,C,S} \ {hp0, os0, lvars0} >- instrs \ {hp1, os1, lvars1} == \pre post frs. (gis (gmb G C S) = pre @ instrs @ post) \