src/HOL/UNITY/Simple/Network.thy

--- a/src/HOL/UNITY/Simple/Network.thy	Tue Sep 09 17:51:07 2014 +0200
+++ b/src/HOL/UNITY/Simple/Network.thy	Tue Sep 09 20:51:36 2014 +0200
@@ -11,9 +11,9 @@
 
 (*The state assigns a number to each process variable*)
 
-datatype pvar = Sent | Rcvd | Idle
+datatype_new pvar = Sent | Rcvd | Idle
 
-datatype pname = Aproc | Bproc
+datatype_new pname = Aproc | Bproc
 
 type_synonym state = "pname * pvar => nat"