Mercurial > hg > Members > kono > Cerium

annotate example/Bulk/ppe/Twice.cc @ 787:5df90e02e34f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix Bulk
author yutaka@localhost.localdomain
date Sat, 24 Apr 2010 17:25:46 +0900
parents 226d95fa2691
children bcc81531a672
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
652
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
1 #include <stdio.h>
685
b386522827ae Bulk task on going.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 684
diff changeset
2 #include "SchedTaskArray.h"
652
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
3 #include "Twice.h"
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
4 #include "Func.h"
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
5
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
6 /* これは必須 */
787
5df90e02e34f fix Bulk
yutaka@localhost.localdomain
parents: 701
diff changeset
7 SchedDefineTask1(Twice,twice_run);
652
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
8
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
9 static int
787
5df90e02e34f fix Bulk
yutaka@localhost.localdomain
parents: 701
diff changeset
10 twice_run(SchedTask *s,void *rbuf, void *wbuf)
652
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
11 {
699
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 685
diff changeset
12 // SchedTaskArray *a = (SchedTaskArray *)s;
685
b386522827ae Bulk task on going.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 684
diff changeset
13
652
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
14 int *i_data;
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
15 int *o_data;
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
16 long length;
701
226d95fa2691 Bulk task worked on Mac OS X
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 699
diff changeset
17 int count = (int)s->get_param(0);
652
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
18
701
226d95fa2691 Bulk task worked on Mac OS X
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 699
diff changeset
19 for(int j = 0; j<count; j++) {
226d95fa2691 Bulk task worked on Mac OS X
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 699
diff changeset
20 i_data = (int*)s->get_input(rbuf, j);
226d95fa2691 Bulk task worked on Mac OS X
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 699
diff changeset
21 o_data = (int*)s->get_output(wbuf, j);
226d95fa2691 Bulk task worked on Mac OS X
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 699
diff changeset
22 length = (long)s->get_param(j+1);
226d95fa2691 Bulk task worked on Mac OS X
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 699
diff changeset
23
226d95fa2691 Bulk task worked on Mac OS X
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 699
diff changeset
24 for (int i = 0; i < length; i++) {
226d95fa2691 Bulk task worked on Mac OS X
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 699
diff changeset
25 o_data[i] = i_data[i] * 2;
226d95fa2691 Bulk task worked on Mac OS X
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 699
diff changeset
26 }
652
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
27 }
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
28
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
29 return 0;
dbe137505f2e bulk task list start.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
30 }