Fixed Cactus-to-MPI type conversion for complex types.

git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/Slab/trunk@13 2e825fa2-fb71-486d-8b7f-a5ff3f0f6cb8

1 files changed, 2 insertions, 8 deletions

diff --git a/src/slab.c b/src/slab.c
index 03b7190..27417eb 100644
--- a/src/slab.c
+++ b/src/slab.c
@@ -350,20 +350,14 @@ static int mpi_type (int const cactustype)
 #endif
 #if defined CCTK_REAL4 && defined MPI_REAL4
   case CCTK_VARIABLE_REAL4: return MPI_REAL4;
+  case CCTK_VARIABLE_COMPLEX8: return MPI_COMPLEX8;
 #endif
 #if defined CCTK_REAL8 && defined MPI_REAL8
   case CCTK_VARIABLE_REAL8: return MPI_REAL8;
+  case CCTK_VARIABLE_COMPLEX16: return MPI_COMPLEX16;
 #endif
 #if defined CCTK_REAL16 && defined MPI_REAL16
   case CCTK_VARIABLE_REAL16: return MPI_REAL16;
-#endif
-#if defined CCTK_REAL4 && defined CCTK_COMPLEX8
-  case CCTK_VARIABLE_COMPLEX8: return MPI_COMPLEX8;
-#endif
-#if defined CCTK_REAL4 && defined CCTK_COMPLEX16
-  case CCTK_VARIABLE_COMPLEX16: return MPI_COMPLEX16;
-#endif
-#if defined CCTK_REAL16 && defined CCTK_COMPLEX32
   case CCTK_VARIABLE_COMPLEX32: return MPI_COMPLEX32;
 #endif
   }