Mercurial > cgi-bin > hgwebdir.cgi > VMS > VMS_Implementations > VSs_impls > VSs__MC_shared_impl
diff nanos-vss.c @ 41:37bb39da5ff1
static3d working, still trouble with child tasks
| author | Nina Engelhardt <nengel@mailbox.tu-berlin.de> |
|---|---|
| date | Wed, 05 Jun 2013 14:40:40 +0200 |
| parents | df464a215387 |
| children | bb6fbcbce14d |
line diff
1.1 --- a/nanos-vss.c Mon Jun 03 18:49:19 2013 +0200 1.2 +++ b/nanos-vss.c Wed Jun 05 14:40:40 2013 +0200 1.3 @@ -16,12 +16,15 @@ 1.4 nanos_omp_set_interface 1.5 nanos_smp_factory*/ 1.6 1.7 +int tasks_created = 0; 1.8 + 1.9 nanos_wd_t nanos_current_wd(void) { 1.10 return (nanos_wd_t) ((VSsSemData*) currVP->semanticData)->taskStub; 1.11 } 1.12 1.13 nanos_err_t nanos_create_wd_compact(nanos_wd_t *wd, nanos_const_wd_definition_t *const_data, nanos_wd_dyn_props_t *dyn_props, 1.14 size_t data_size, void ** data, nanos_wg_t wg, nanos_copy_data_t **copies) { 1.15 + 1.16 VSsTaskStub* ts = (VSsTaskStub*) malloc(sizeof (VSsTaskStub)); 1.17 void* alloc_data = malloc(data_size); 1.18 *data = alloc_data; 1.19 @@ -73,7 +76,11 @@ 1.20 reqData.deps = depsAddrs; 1.21 reqData.callingSlv = currVP; 1.22 1.23 - reqData.taskID = NULL; 1.24 + int32* taskID; 1.25 + taskID = VSs__create_taskID_of_size(1); 1.26 + taskID[1] = tasks_created++; 1.27 + 1.28 + reqData.taskID = taskID; 1.29 1.30 free(ts); 1.31 1.32 @@ -128,7 +135,11 @@ 1.33 reqData.deps = depsAddrs; 1.34 reqData.callingSlv = currVP; 1.35 1.36 - reqData.taskID = NULL; 1.37 + int32* taskID; 1.38 + taskID = VSs__create_taskID_of_size(1); 1.39 + taskID[1] = tasks_created++; 1.40 + 1.41 + reqData.taskID = taskID; 1.42 1.43 VMS_WL__send_sem_request(&reqData, currVP); 1.44
