Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
Iker Martín Álvarez
Proteo
Commits
ee51c620
Commit
ee51c620
authored
Jun 06, 2024
by
iker_martin
Browse files
Removed unused lines and added more debugging lines
parent
508ad3ba
Changes
3
Hide whitespace changes
Inline
Side-by-side
Codes/malleability/MAM_Manager.c
View file @
ee51c620
...
...
@@ -292,8 +292,6 @@ void MAM_Commit(int *mam_state) {
// Set new communicator
MPI_Comm_dup
(
mall
->
comm
,
mall
->
user_comm
);
//if(mall_conf->spawn_method == MAM_SPAWN_BASELINE) { *(mall->user_comm) = MPI_COMM_WORLD; }
//else if(mall_conf->spawn_method == MAM_SPAWN_MERGE) { MPI_Comm_dup(mall->comm, mall->user_comm); }
#if MAM_DEBUG
if
(
mall
->
myId
==
mall
->
root
)
DEBUG_FUNC
(
"Reconfiguration has been commited"
,
mall
->
myId
,
mall
->
numP
);
fflush
(
stdout
);
#endif
...
...
@@ -1034,6 +1032,9 @@ int end_redistribution() {
#endif
if
(
mall_conf
->
spawn_method
==
MAM_SPAWN_MERGE
)
mall_conf
->
times
->
sync_end
=
MPI_Wtime
();
// Merge method only
}
#if MAM_DEBUG
DEBUG_FUNC
(
"Sources have completed synchronous data redistribution step"
,
mall
->
myId
,
mall
->
numP
);
fflush
(
stdout
);
MPI_Barrier
(
mall
->
comm
);
#endif
local_state
=
MAM_I_DIST_COMPLETED
;
if
(
mall_conf
->
spawn_method
==
MAM_SPAWN_MERGE
&&
mall
->
numP
>
mall
->
numC
)
{
// Merge Shrink
...
...
Codes/malleability/spawn_methods/Baseline.c
View file @
ee51c620
...
...
@@ -101,8 +101,6 @@ void multiple_strat_parents(Spawn_data spawn_data, MPI_Comm comm, MPI_Comm *inte
int
i
,
tag
;
char
*
port_name
,
aux
;
//MPI_Barrier(MPI_COMM_WORLD);
//printf("P%d TEST END - set[%d] spw=%d\n", mall->myId, i, spawn_data.sets[i].spawn_qty); fflush(stdout);
if
(
mall
->
myId
==
mall
->
root
)
{
port_name
=
(
char
*
)
malloc
(
MPI_MAX_PORT_NAME
*
sizeof
(
char
));
tag
=
MAM_TAG_STRAT_MULTIPLE_FIRST
;
...
...
Exec/generalRun.sh
View file @
ee51c620
...
...
@@ -61,7 +61,9 @@ if [ $use_extrae -ne 1 ]
then
for
((
i
=
0
;
i<qty
;
i++
))
do
echo
"Run
$i
starts"
mpirun
-hosts
$initial_nodelist
-np
$numP
$dir$codeDir
/a.out
$configFile
$outFileIndex
echo
"Run
$i
ends"
done
else
cp
$dir$execDir
/Extrae/extrae.xml
.
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment