# HG changeset patch
# User one
# Date 1492167146 -32400
# Node ID d9887056ae5be2181a6fe66441594a1363348122
# Parent  131a04a70dd860f2121200736e6a1b7b1fca4063
Update Todo and Add comment to perl script

diff -r 131a04a70dd8 -r d9887056ae5b src/parallel_execution/Todo
--- a/src/parallel_execution/Todo	Tue Mar 21 16:07:30 2017 +0900
+++ b/src/parallel_execution/Todo	Fri Apr 14 19:52:26 2017 +0900
@@ -1,3 +1,26 @@
+Fri Apr 14 18:44:09 JST 2017
+    struct B {
+        A a;
+        .....
+    }
+    struct A {
+        __code init(..., __code next(A a, ...));
+    }
+    par goto A->init(a);
+    // meta level
+    task->code = C_init_A;
+    task->data[idg] = ...;
+    task->data[idg + 1] = ...;
+    task->data[odg] = ...;
+    task->next = C_writeToa;
+    goto meta(context, context->TaskManager->spawn)
+
+    // lambda version?
+    par goto A->init(\A -> a = A)
+
+    // meta level
+    par goto A->init(next = \A -> a = A)
+
 Wed Mar  1 18:25:36 JST 2017
 
     parallel_executtion/test/ を .cbc に書き直す
diff -r 131a04a70dd8 -r d9887056ae5b src/parallel_execution/generate_stub.pl
--- a/src/parallel_execution/generate_stub.pl	Tue Mar 21 16:07:30 2017 +0900
+++ b/src/parallel_execution/generate_stub.pl	Fri Apr 14 19:52:26 2017 +0900
@@ -248,6 +248,8 @@
                 # generate CodeGear header with new arguments
                 print $fd "__code $codeGearName($newArgs)$tail\n";
                 if ($outputVar{$codeGearName} ne "") {
+                    # output data var can be use before write
+                    # it should be initialze by gearef
                     print $fd $outputVar{$codeGearName};
                 }
                 next;