add function CTask as a shortcut

Author: KDr2

README.md

@@ -20,7 +20,8 @@ function f_ct()
   end
 end
 
-t = Task(f_ct) |> enable_stack_copying
+t = CTask(f_ct)
+# or t = Task(f_ct) |> enable_stack_copying
 
 consume(t) == 0
 consume(t) == 1
@@ -40,7 +41,9 @@ function f_ct2()
   end
 end
 
-t = Task(f_ct2) |> enable_stack_copying
+t = CTask(f_ct2)
+# or t = Task(f_ct2) |> enable_stack_copying
+
 
 consume(t) == 0
 consume(t) == 1

src/Libtask.jl

@@ -1,6 +1,6 @@
 module Libtask
 
-export enable_stack_copying, consume, produce, TArray, get, tzeros, tfill, TRef
+export enable_stack_copying, CTask, consume, produce, TArray, get, tzeros, tfill, TRef
 
 include("../deps/deps.jl"); check_deps();
 include("taskcopy.jl")

src/taskcopy.jl

@@ -22,6 +22,8 @@ function enable_stack_copying(t::Task)
     return ccall((:jl_enable_stack_copying, libtask), Any, (Any,), t)::Task
 end
 
+CTask(func) = Task(func) |> enable_stack_copying
+
 function Base.copy(t::Task)
   t.state != :runnable && t.state != :done &&
     error("Only runnable or finished tasks can be copied.")

test/clonetask.jl

@@ -32,7 +32,7 @@ function f_ct2()
   end
 end
 
-t = Task(f_ct2) |> enable_stack_copying
+t = CTask(f_ct2)
 
 @test consume(t) == 0
 @test consume(t) == 1