Fixed minor mem bug and error related to Merge Shrink

Main/ConjugateGradient.c

@@ -89,7 +89,7 @@ void getIds_intercomm(struct Dist_data dist_data, int numP_other, int *idS);
 //----------------------------------------------------------------------------------------------------
 
 int main (int argc, char *argv[]) {
-	int sm;
+	int init_numP;
 	int req;
         Compute_data computeData;
         user_redist_t user_data;
@@ -120,6 +120,7 @@ int main (int argc, char *argv[]) {
 	  init_app(&computeData, &dist_data, argv);
           originals_set_data(&dist_data, &computeData, num_targets);
 
+	  init_numP = dist_data.numP;
 	  user_data.array_vptr = computeData.subm.vptr;
 	  user_data.array_vpos = computeData.subm.vpos;
   	  user_data.array_vval = computeData.subm.vval;
@@ -140,9 +141,10 @@ int main (int argc, char *argv[]) {
 	// End of CG
         MAM_Finalize();
         free_computeData(&computeData);
-	if(dist_data.numP > num_targets && dist_data.myId == 0) {
+	if(init_numP > num_targets && dist_data.myId == 0) {
           MPI_Abort(MPI_COMM_WORLD, -100);
 	}
+	if(dist_data.comm != MPI_COMM_WORLD && dist_data.comm != MPI_COMM_NULL) MPI_Comm_free(&dist_data.comm);
         MPI_Finalize();
 }
 

malleability/spawn_methods/ProcessDist.c

@@ -134,7 +134,7 @@ void compact_dist(Spawn_data spawn_data, int *used_nodes, int *procs) {
   int i, asigCores;
   int tamBl, remainder;
 
-  tamBl = mall->num_cpus / mall->num_nodes;
+  tamBl = mall->num_cpus;
   asigCores = spawn_data.already_created;
   i = *used_nodes = spawn_data.already_created / tamBl;
   remainder = spawn_data.already_created % tamBl;