src/HOL/Library/Parallel.thy
changeset 58249 180f1b3508ed
parent 52435 6646bb548c6b
child 58310 91ea607a34d8
     1.1 --- a/src/HOL/Library/Parallel.thy	Tue Sep 09 17:51:07 2014 +0200
     1.2 +++ b/src/HOL/Library/Parallel.thy	Tue Sep 09 20:51:36 2014 +0200
     1.3 @@ -8,7 +8,7 @@
     1.4  
     1.5  subsection {* Futures *}
     1.6  
     1.7 -datatype 'a future = fork "unit \<Rightarrow> 'a"
     1.8 +datatype_new 'a future = fork "unit \<Rightarrow> 'a"
     1.9  
    1.10  primrec join :: "'a future \<Rightarrow> 'a" where
    1.11    "join (fork f) = f ()"