src/HOL/IMP/ACom.thy

--- a/src/HOL/IMP/ACom.thy	Tue Sep 09 17:51:07 2014 +0200
+++ b/src/HOL/IMP/ACom.thy	Tue Sep 09 20:51:36 2014 +0200
@@ -6,7 +6,7 @@
 
 subsection "Annotated Commands"
 
-datatype 'a acom =
+datatype_new 'a acom =
   SKIP 'a                           ("SKIP {_}" 61) |
   Assign vname aexp 'a              ("(_ ::= _/ {_})" [1000, 61, 0] 61) |
   Seq "('a acom)" "('a acom)"       ("_;;//_"  [60, 61] 60) |