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

1 files changed, 4 insertions, 4 deletions

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 */