diff options
| author | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2000-07-14 23:35:33 +0000 |
|---|---|---|
| committer | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2000-07-14 23:35:33 +0000 |
| commit | dc0de5360a475a206aea0284ee8191f43d2844d9 (patch) | |
| tree | 851217952613e68ad43eb5fe7a581aadc2c8a0be /src/comm/OverloadComm.c | |
| parent | a4bfa13b225c75d2fc22f7f2125eef3a890888d5 (diff) | |
New arguements for CCTK_Exit and CCTK_Abort, and fixed some return values
git-svn-id: http://svn.cactuscode.org/flesh/trunk@1742 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'src/comm/OverloadComm.c')
| -rw-r--r-- | src/comm/OverloadComm.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/comm/OverloadComm.c b/src/comm/OverloadComm.c index d91ff2a0..13548666 100644 --- a/src/comm/OverloadComm.c +++ b/src/comm/OverloadComm.c @@ -107,9 +107,9 @@ int CCTKi_SetupCommFunctions(void) -int CCTK_FCALL CCTK_FNAME(CCTK_Exit)(int *retval, cGH *GH) +int CCTK_FCALL CCTK_FNAME(CCTK_Exit)(cGH *GH, int *retval) { - return CCTK_Exit(*retval, GH); + return CCTK_Exit(GH, *retval); } int CCTK_FCALL CCTK_FNAME(CCTK_ParallelInit)(cGH *GH) @@ -117,9 +117,9 @@ int CCTK_FCALL CCTK_FNAME(CCTK_ParallelInit)(cGH *GH) return CCTK_ParallelInit(GH); } -int CCTK_FCALL CCTK_FNAME(CCTK_Abort)(cGH *GH) +int CCTK_FCALL CCTK_FNAME(CCTK_Abort)(cGH *GH, int *retval) { - CCTK_Abort(GH); + CCTK_Abort(GH, *retval); return 0; } @@ -131,14 +131,14 @@ int CCTK_FCALL CCTK_FNAME(CCTK_SyncGroup)(cGH *GH, ONE_FORTSTRING_ARG) return 0; } -int CCTK_FCALL CCTK_FNAME(CCTK_EnableGroupComm)(int *ierr, cGH *GH, ONE_FORTSTRING_ARG) +void CCTK_FCALL CCTK_FNAME(CCTK_EnableGroupComm)(int *ierr, cGH *GH, ONE_FORTSTRING_ARG) { ONE_FORTSTRING_CREATE(group_name) *ierr = CCTK_EnableGroupComm(GH, group_name); free(group_name); } -int CCTK_FCALL CCTK_FNAME(CCTK_EnableGroupStorage)(int *ierr, cGH *GH, ONE_FORTSTRING_ARG) +void CCTK_FCALL CCTK_FNAME(CCTK_EnableGroupStorage)(int *ierr, cGH *GH, ONE_FORTSTRING_ARG) { ONE_FORTSTRING_CREATE(group_name) *ierr = CCTK_EnableGroupStorage(GH, group_name); |