Mercurial > hg > Gears > Gears
changeset 324:d9887056ae5b
Update Todo and Add comment to perl script
| author | one |
|---|---|
| date | Fri, 14 Apr 2017 19:52:26 +0900 |
| parents | 131a04a70dd8 |
| children | 69cdda536487 |
| files | src/parallel_execution/Todo src/parallel_execution/generate_stub.pl |
| diffstat | 2 files changed, 25 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- 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 に書き直す
--- 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;