summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authortradke <tradke@17b73243-c579-4c4c-a9d2-2d5706c11dac>2004-06-23 17:49:01 +0000
committertradke <tradke@17b73243-c579-4c4c-a9d2-2d5706c11dac>2004-06-23 17:49:01 +0000
commit6083011322738fde28d265edb1360c3186034beb (patch)
tree3a28b83959e5d8993db1b55e7a27486af07ae945 /src
parente5c5e77380b36039d81e55dc5f1b195f1ca4c7e4 (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.h39
-rw-r--r--src/main/ScheduleInterface.c12
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",