Commit 610d94e2 authored by iker_martin's avatar iker_martin
Browse files

Hotfix - After refactoring the application, the changes in some variable types...

Hotfix - After refactoring the application, the changes in some variable types were not also performed for MPI calls
parent ed209ce9
...@@ -278,7 +278,8 @@ void def_struct_config_file(configuration *config_file, MPI_Datatype *config_typ ...@@ -278,7 +278,8 @@ void def_struct_config_file(configuration *config_file, MPI_Datatype *config_typ
MPI_Datatype types[counts]; MPI_Datatype types[counts];
// Rellenar vector types // Rellenar vector types
types[0] = types[1] = types[2] = types[3] = types[4] = types[5] = MPI_INT; types[0] = types[1] = MPI_UNSIGNED_LONG;
types[2] = types[3] = types[4] = types[5] = MPI_INT;
types[6] = types[7] = MPI_DOUBLE; types[6] = types[7] = MPI_DOUBLE;
// Rellenar vector displs // Rellenar vector displs
......
...@@ -173,7 +173,7 @@ void def_malleability_entries(malleability_data_t *data_struct_rep, malleability ...@@ -173,7 +173,7 @@ void def_malleability_entries(malleability_data_t *data_struct_rep, malleability
MPI_Datatype types[counts]; MPI_Datatype types[counts];
blocklengths[0] = blocklengths[1] = 1; blocklengths[0] = blocklengths[1] = 1;
types[0] = types[1] = MPI_INT; types[0] = types[1] = MPI_UNSIGNED_LONG;
// Obtener direccion base // Obtener direccion base
MPI_Get_address(&(data_struct_rep->entries), &displs[0]); MPI_Get_address(&(data_struct_rep->entries), &displs[0]);
...@@ -196,7 +196,8 @@ void def_malleability_qty_type(malleability_data_t *data_struct_rep, malleabilit ...@@ -196,7 +196,8 @@ void def_malleability_qty_type(malleability_data_t *data_struct_rep, malleabilit
MPI_Aint displs[counts]; MPI_Aint displs[counts];
MPI_Datatype types[counts]; MPI_Datatype types[counts];
types[0] = types[1] = types[2] = types[3] = MPI_INT; types[0] = types[2] = MPI_UNSIGNED_LONG;
types[1] = types[3] = MPI_INT;
blocklengths[0] = blocklengths[1] = data_struct_rep->entries; blocklengths[0] = blocklengths[1] = data_struct_rep->entries;
blocklengths[2] = blocklengths[3] = data_struct_dist->entries; blocklengths[2] = blocklengths[3] = data_struct_dist->entries;
......
...@@ -44,6 +44,7 @@ int baseline_spawn(Spawn_data spawn_data, MPI_Comm comm, MPI_Comm *child) { ...@@ -44,6 +44,7 @@ int baseline_spawn(Spawn_data spawn_data, MPI_Comm comm, MPI_Comm *child) {
// WORK // WORK
int spawn_err = MPI_Comm_spawn(spawn_data.cmd, MPI_ARGV_NULL, spawn_data.spawn_qty, spawn_data.mapping, spawn_data.root, comm, child, MPI_ERRCODES_IGNORE); int spawn_err = MPI_Comm_spawn(spawn_data.cmd, MPI_ARGV_NULL, spawn_data.spawn_qty, spawn_data.mapping, spawn_data.root, comm, child, MPI_ERRCODES_IGNORE);
MPI_Comm_set_name(*child, "MPI_COMM_MALL_RESIZE");
// END WORK // END WORK
if(spawn_err != MPI_SUCCESS) { if(spawn_err != MPI_SUCCESS) {
......
...@@ -4,6 +4,7 @@ ...@@ -4,6 +4,7 @@
#include <stdio.h> #include <stdio.h>
#include <stdlib.h> #include <stdlib.h>
#include <mpi.h> #include <mpi.h>
#include <string.h>
#include "../malleabilityDataStructures.h" #include "../malleabilityDataStructures.h"
int baseline(Spawn_data spawn_data, MPI_Comm *child); int baseline(Spawn_data spawn_data, MPI_Comm *child);
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment