Mercurial > cgi-bin > hgwebdir.cgi > PR > Applications > PRDSL > PRDSL__Test_App
annotate PRDSL__Test_App/Task.c @ 0:1cb25216938b
Initial add -- working
| author | Sean Halle <seanhalle@yahoo.com> |
|---|---|
| date | Thu, 19 Sep 2013 18:08:07 -0700 |
| parents | |
| children |
| rev | line source |
|---|---|
| seanhalle@0 | 1 /* |
| seanhalle@0 | 2 * Copyright 2009 OpenSourceResearchInstitute.org |
| seanhalle@0 | 3 * Licensed under GNU General Public License version 2 |
| seanhalle@0 | 4 * |
| seanhalle@0 | 5 * Author: seanhalle@yahoo.com |
| seanhalle@0 | 6 * |
| seanhalle@0 | 7 */ |
| seanhalle@0 | 8 |
| seanhalle@0 | 9 |
| seanhalle@0 | 10 #include <math.h> |
| seanhalle@0 | 11 #include <string.h> |
| seanhalle@0 | 12 #include "PRDSL__Test_App.h" |
| seanhalle@0 | 13 |
| seanhalle@0 | 14 int |
| seanhalle@0 | 15 square( int x ) |
| seanhalle@0 | 16 { return x*x; |
| seanhalle@0 | 17 } |
| seanhalle@0 | 18 |
| seanhalle@0 | 19 void task_birthFn( void *_params, SlaveVP *animVP ) |
| seanhalle@0 | 20 { int32 i; |
| seanhalle@0 | 21 TaskParams *params = (TaskParams *)_params; |
| seanhalle@0 | 22 int32 *data = params->data; |
| seanhalle@0 | 23 DEBUG__printf(TRUE, "Task %d", params->start); |
| seanhalle@0 | 24 for( i=params->start; i < params->end; ++i ) |
| seanhalle@0 | 25 { data[i] = square(i); |
| seanhalle@0 | 26 } |
| seanhalle@0 | 27 PRDSL__end_task( animVP ); |
| seanhalle@0 | 28 } |
| seanhalle@0 | 29 |