Mercurial > hg > Gears > GearsAgda

comparison src/parallel_execution/examples/twice/twice.cbc @ 441:5a737c3df91c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add AtomicReference Implements of Atomic Interface
author Tatsuki IHA <innparusu@cr.ie.u-ryukyu.ac.jp>
date Tue, 21 Nov 2017 04:28:36 +0900
parents 7679093bdd72
children
comparison
equal deleted inserted replaced
440:55db2a339958 441:5a737c3df91c
32 buffer->inputData[0] = (union Data*)inputArray->array; 32 buffer->inputData[0] = (union Data*)inputArray->array;
33 buffer->inputData[1] = (union Data*)inputArray; 33 buffer->inputData[1] = (union Data*)inputArray;
34 buffer->outputData = NULL; 34 buffer->outputData = NULL;
35 buffer->inputLen = 2; 35 buffer->inputLen = 2;
36 buffer->outputLen = 0; 36 buffer->outputLen = 0;
37 //continuationにそってGPUworkerに戻る
38 outputArray->array = inputArray->array;
39 Executor* executor = context->worker->worker->CUDAWorker.executor; 37 Executor* executor = context->worker->worker->CUDAWorker.executor;
40 executor->executor->CUDAExecutor.buffer = buffer; 38 executor->executor->CUDAExecutor.buffer = buffer;
41 cudaLoadFunction(context, "c/examples/twice/CUDAtwice.ptx", "twice"); 39 cudaLoadFunction(context, "c/examples/twice/CUDAtwice.ptx", "twice");
40 outputArray->array = inputArray->array;
42 Gearef(context, Executor)->executor = (union Data*)executor; 41 Gearef(context, Executor)->executor = (union Data*)executor;
43 Gearef(context, Executor)->task = context; 42 Gearef(context, Executor)->task = context;
44 Gearef(context, Executor)->next = context->next; 43 Gearef(context, Executor)->next = context->next;
45 goto meta(context, executor->read); 44 goto meta(context, executor->read);
46 } 45 }