From c25bd93ed153311f74bf7ee792eadbed4b830b01 Mon Sep 17 00:00:00 2001 From: schnetter Date: Fri, 26 Aug 2005 14:49:16 +0000 Subject: GetMPICommWorld now returns a pointer to the communicator, instead of the communicator itself cast to an int git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/Slab/trunk@44 2e825fa2-fb71-486d-8b7f-a5ff3f0f6cb8 --- src/slab.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'src/slab.c') diff --git a/src/slab.c b/src/slab.c index 3fec618..47c2339 100644 --- a/src/slab.c +++ b/src/slab.c @@ -302,7 +302,7 @@ get_mpi_comm (const cGH * restrict const cctkGH) { #ifdef CCTK_MPI if (CCTK_IsFunctionAliased ("GetMPICommWorld")) { - return GetMPICommWorld (cctkGH); + return * (MPI_Comm const *) GetMPICommWorld (cctkGH); } # if defined CARPET_CARPET { @@ -800,11 +800,11 @@ int Slab_MultiTransfer (cGH const * const cctkGH, { - CCTK_INT tmp; - int const iret = Util_TableGetInt (options, &tmp, "comm"); + CCTK_POINTER tmp; + int const iret = Util_TableGetPointer (options, &tmp, "comm"); if (iret == 1) { /* There was an entry, use it */ - comm = tmp; + comm = * (MPI_Comm const *) tmp; } else if (iret == UTIL_ERROR_BAD_HANDLE || iret == UTIL_ERROR_TABLE_NO_SUCH_KEY) { /* There was no entry, use a default */ -- cgit v1.2.3