diff options
author | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2001-03-17 10:45:37 +0000 |
---|---|---|
committer | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2001-03-17 10:45:37 +0000 |
commit | bf6fb130cc09305f2e95aac1b276f8e765c7a1b7 (patch) | |
tree | 62ad872529ae36a5f90e2c4df487e341070f5ded /src/main/ScheduleInterface.c | |
parent | 352fb8b905eadacb205f2a7d53168606c697fd59 (diff) |
Fixing order of sync and trigger actions for analysis routines.
Fixes PR 567 - good eyes Erik.
Tom
git-svn-id: http://svn.cactuscode.org/flesh/trunk@2083 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'src/main/ScheduleInterface.c')
-rw-r--r-- | src/main/ScheduleInterface.c | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/src/main/ScheduleInterface.c b/src/main/ScheduleInterface.c index d3e43e0c..3112d20f 100644 --- a/src/main/ScheduleInterface.c +++ b/src/main/ScheduleInterface.c @@ -2219,6 +2219,16 @@ static int CCTKi_ScheduleCallExit(t_attribute *attribute, if(attribute && attribute->done_entry) { + + /* Synchronise variable groups associated with this schedule group. */ + if(attribute->FunctionData.n_SyncGroups > 0 && ! data->synchronised) + { + CCTK_SyncGroupsI(data->GH, + attribute->FunctionData.n_SyncGroups, + attribute->FunctionData.SyncGroups); + data->synchronised = 0; + } + if(data->schedpoint == schedpoint_analysis) { /* In analysis, so do any trigger actions. */ @@ -2233,15 +2243,6 @@ static int CCTKi_ScheduleCallExit(t_attribute *attribute, } } - /* Synchronise variable groups associated with this schedule group. */ - if(attribute->FunctionData.n_SyncGroups > 0 && ! data->synchronised) - { - CCTK_SyncGroupsI(data->GH, - attribute->FunctionData.n_SyncGroups, - attribute->FunctionData.SyncGroups); - data->synchronised = 0; - } - /* Switch off communication if it was done in entry. */ for(i = 0; i < attribute->n_comm_groups; i++) { |