diff options
author | tradke <tradke@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2004-06-23 17:49:01 +0000 |
---|---|---|
committer | tradke <tradke@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2004-06-23 17:49:01 +0000 |
commit | 6083011322738fde28d265edb1360c3186034beb (patch) | |
tree | 3a28b83959e5d8993db1b55e7a27486af07ae945 /src | |
parent | e5c5e77380b36039d81e55dc5f1b195f1ca4c7e4 (diff) |
Add option flag for 'local' mode.
git-svn-id: http://svn.cactuscode.org/flesh/trunk@3788 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'src')
-rw-r--r-- | src/include/cctk_Schedule.h | 39 | ||||
-rw-r--r-- | src/main/ScheduleInterface.c | 12 |
2 files changed, 28 insertions, 23 deletions
diff --git a/src/include/cctk_Schedule.h b/src/include/cctk_Schedule.h index 3979e581..52237d8f 100644 --- a/src/include/cctk_Schedule.h +++ b/src/include/cctk_Schedule.h @@ -1,10 +1,10 @@ /*@@ - @header cctk_schedule.h - @date Thu Sep 16 19:05:27 1999 - @author Tom Goodale - @desc - Routines for creating schedule stuff. - @enddesc + @header cctk_schedule.h + @date Thu Sep 16 19:05:27 1999 + @author Tom Goodale + @desc + Routines for creating schedule stuff. + @enddesc @version $Header$ @@*/ @@ -18,7 +18,7 @@ typedef enum {FunctionNoArgs, FunctionOneArg, FunctionStandard} cFunctionType; typedef struct { cLanguage language; - + int (*FortranCaller)(cGH *, void *); cFunctionType type; @@ -32,10 +32,10 @@ typedef struct int meta; int global; int level; + int local; int singlemap; - /* The last items should be considered volatile and may - not stay here */ + /* The last items should be considered volatile and may not stay here */ int n_TriggerGroups; int *TriggerGroups; @@ -46,24 +46,25 @@ typedef struct } cFunctionData; #ifdef __cplusplus -extern "C" +extern "C" { #endif -int CCTK_CallFunction(void *function, - cFunctionData *fdata, +int CCTK_CallFunction(void *function, + cFunctionData *fdata, void *data); -int CCTK_ScheduleTraverse(const char *where, - void *GH, - int (*CallFunction)(void *, cFunctionData *, void *)); +int CCTK_ScheduleTraverse(const char *where, + void *GH, + int (*CallFunction)(void *, cFunctionData *, void *)); int CCTK_SchedulePrint(const char *where); int CCTK_SchedulePrintTimes(const char *where); cLanguage CCTK_TranslateLanguage(const char *sval); - /*int CCTK_ScheduleFunction(void *function, +#if 0 +int CCTK_ScheduleFunction(void *function, const char *name, const char *thorn, const char *implementation, @@ -95,12 +96,12 @@ int CCTK_ScheduleGroupStorage(const char *group); int CCTK_ScheduleGroupComm(const char *group); -int CCTK_ScheduleTraverse(const char *where, - void *GH, +int CCTK_ScheduleTraverse(const char *where, + void *GH, int (*calling_function)(void *, void *, void *)); int CCTK_ScheduleGHInit(void *GH); - */ +#endif #ifdef __cplusplus diff --git a/src/main/ScheduleInterface.c b/src/main/ScheduleInterface.c index cf0a34ae..76359b81 100644 --- a/src/main/ScheduleInterface.c +++ b/src/main/ScheduleInterface.c @@ -814,10 +814,10 @@ int CCTKi_ScheduleGHInit(void *GH) if (n_scheduled_storage_groups>0) { CCTK_GroupStorageIncrease(GH, - n_scheduled_storage_groups, - scheduled_storage_groups, - scheduled_storage_groups_timelevels, - NULL); + n_scheduled_storage_groups, + scheduled_storage_groups, + scheduled_storage_groups_timelevels, + NULL); } for(i = 0; i < n_scheduled_comm_groups; i++) @@ -1633,6 +1633,10 @@ static int ParseOption(t_attribute *attribute, { attribute->FunctionData.singlemap = 1; } + else if(CCTK_Equals(option, "LOCAL")) + { + attribute->FunctionData.local = 1; + } else { CCTK_Warn(1,__LINE__,__FILE__,"Cactus", |