Minor bugfix in MaM when no asynch communication is used

malleability/malleabilityManager.c

@@ -26,6 +26,7 @@ int MAM_St_spawn_start();
 int MAM_St_spawn_pending(int wait_completed);
 int MAM_St_red_start();
 int MAM_St_red_pending(int *mam_state, int wait_completed);
+int MAM_St_user_start(int *mam_state);
 int MAM_St_user_pending(int *mam_state, int wait_completed, void (*user_function)(void *), void *user_args);
 int MAM_St_user_completed();
 int MAM_St_spawn_adapt_pending(int wait_completed);
@@ -210,6 +211,10 @@ int MAM_Checkpoint(int *mam_state, int wait_completed, void (*user_function)(voi
       call_checkpoint = MAM_St_red_pending(mam_state, wait_completed);
       break;
 
+    case MALL_USER_START:
+      call_checkpoint = MAM_St_user_start(mam_state);
+      break;
+
     case MALL_USER_PENDING:
       call_checkpoint = MAM_St_user_pending(mam_state, wait_completed, user_function, user_args);
       break;
@@ -601,19 +606,24 @@ int MAM_St_red_pending(int *mam_state, int wait_completed) {
   }
 
   if(state != MALL_DIST_PENDING) { 
-    if(MAM_Contains_strat(MAM_SPAWN_STRATEGIES, MAM_STRAT_SPAWN_INTERCOMM, NULL)) {
-      MPI_Intercomm_merge(mall->intercomm, MALLEABILITY_NOT_CHILDREN, &mall->tmp_comm); //El que pone 0 va primero
-    } else {
-      MPI_Comm_dup(mall->intercomm, &mall->tmp_comm);
-    }
-    MPI_Comm_set_name(mall->tmp_comm, "MAM_USER_TMP");
-    state = MALL_USER_PENDING;
-    *mam_state = MAM_USER_PENDING;
+    state = MALL_USER_START;
     return 1;
   }
   return 0;
 }
 
+int MAM_St_user_start(int *mam_state) {
+  if(MAM_Contains_strat(MAM_SPAWN_STRATEGIES, MAM_STRAT_SPAWN_INTERCOMM, NULL)) {
+    MPI_Intercomm_merge(mall->intercomm, MALLEABILITY_NOT_CHILDREN, &mall->tmp_comm); //El que pone 0 va primero
+  } else {
+    MPI_Comm_dup(mall->intercomm, &mall->tmp_comm);
+  }
+  MPI_Comm_set_name(mall->tmp_comm, "MAM_USER_TMP");
+  state = MALL_USER_PENDING;
+  *mam_state = MAM_USER_PENDING;
+  return 1;
+}
+
 int MAM_St_user_pending(int *mam_state, int wait_completed, void (*user_function)(void *), void *user_args) {
   #if USE_MAL_DEBUG
     if(mall->myId == mall->root) DEBUG_FUNC("Starting USER redistribution", mall->myId, mall->numP); fflush(stdout);
@@ -874,7 +884,7 @@ int start_redistribution() {
       return MALL_DIST_PENDING; 
     }
   } 
-  return MALL_USER_PENDING;
+  return MALL_USER_START;
 }
 
 

malleability/malleabilityStates.h

@@ -9,7 +9,7 @@
 #define MAM_OK 0
 enum mall_inner_states{MALL_UNRESERVED, MALL_NOT_STARTED, MALL_RMS_COMPLETED, MALL_SPAWN_PENDING, MALL_SPAWN_SINGLE_PENDING, 
 	MALL_SPAWN_SINGLE_COMPLETED, MALL_SPAWN_ADAPT_POSTPONE, MALL_SPAWN_COMPLETED, MALL_DIST_PENDING, MALL_DIST_COMPLETED, 
-	MALL_SPAWN_ADAPT_PENDING, MALL_USER_PENDING, MALL_USER_COMPLETED, MALL_SPAWN_ADAPTED, MALL_COMPLETED};
+	MALL_SPAWN_ADAPT_PENDING, MALL_USER_START, MALL_USER_PENDING, MALL_USER_COMPLETED, MALL_SPAWN_ADAPTED, MALL_COMPLETED};
 enum mam_states{MAM_UNRESERVED, MAM_NOT_STARTED, MAM_PENDING, MAM_USER_PENDING, MAM_COMPLETED};
 enum mam_proc_states{MAM_PROC_CONTINUE, MAM_PROC_NEW_RANK, MAM_PROC_ZOMBIE};