changeset 58249 | 180f1b3508ed |
parent 45451 | 74515e8e6046 |
child 58310 | 91ea607a34d8 |
--- a/src/HOL/Predicate_Compile_Examples/IMP_4.thy Tue Sep 09 17:51:07 2014 +0200 +++ b/src/HOL/Predicate_Compile_Examples/IMP_4.thy Tue Sep 09 20:51:36 2014 +0200 @@ -11,7 +11,7 @@ type_synonym var = nat type_synonym state = "int list" -datatype com = +datatype_new com = Skip | Ass var "int" | Seq com com |