# HG changeset patch # User kleing # Date 1037484119 -3600 # Node ID 9f94248d2f5a06334c19fdd7ce66dd049abd2d9e # Parent 78f91fcdf5606d218a1e6120a4696ccf8ddf7944 beautified "match" diff -r 78f91fcdf560 -r 9f94248d2f5a src/HOL/MicroJava/BV/EffectMono.thy --- a/src/HOL/MicroJava/BV/EffectMono.thy Sat Nov 16 22:54:39 2002 +0100 +++ b/src/HOL/MicroJava/BV/EffectMono.thy Sat Nov 16 23:01:59 2002 +0100 @@ -151,7 +151,7 @@ "is_class G cname" and oT: "G\ oT\ (Class cname)" and vT: "G\ vT\ b" and - xc: "Ball (set (match G (Xcpt NullPointer) pc et)) (is_class G)" + xc: "Ball (set (match G NullPointer pc et)) (is_class G)" by force moreover from s1 G