Mercurial > hg > Gears > GearsAgda

comparison src/parallel_execution/examples/twice/main.cbc @ 413:497b154141de

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Call CUDAExec by twice_stub
author Tatsuki IHA <innparusu@cr.ie.u-ryukyu.ac.jp>
date Thu, 14 Sep 2017 22:28:52 +0900
parents 0eba9a04633f
children 7679093bdd72
comparison
equal deleted inserted replaced
412:409e6b5fb775 413:497b154141de
95 __code createTask1(struct LoopCounter* loopCounter, struct TaskManager* taskManager) { 95 __code createTask1(struct LoopCounter* loopCounter, struct TaskManager* taskManager) {
96 Array* array = &ALLOCATE_DATA_GEAR(context, Array)->Array; 96 Array* array = &ALLOCATE_DATA_GEAR(context, Array)->Array;
97 97
98 par goto createArray(array, __exit); 98 par goto createArray(array, __exit);
99 99
100 if(gpu_num) { 100 par goto twice(array, iterate(split), __exit);
101 par goto CUDAtwice(array, iterate(split), __exit);
102 } else {
103 par goto twice(array, iterate(split), __exit);
104 }
105 goto code2(); 101 goto code2();
106 } 102 }
107 103
108 void init(int argc, char** argv) { 104 void init(int argc, char** argv) {
109 for (int i = 1; argv[i]; ++i) { 105 for (int i = 1; argv[i]; ++i) {