Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
O
openfpm_vcluster
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Locked Files
Issues
0
Issues
0
List
Boards
Labels
Service Desk
Milestones
Merge Requests
0
Merge Requests
0
Requirements
Requirements
List
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Security & Compliance
Security & Compliance
Dependency List
License Compliance
Operations
Operations
Environments
Analytics
Analytics
CI / CD
Code Review
Insights
Issue
Repository
Value Stream
Wiki
Wiki
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
openfpm
openfpm_vcluster
Commits
46c6cf1a
Commit
46c6cf1a
authored
Nov 23, 2015
by
Pietro Incardona
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Small changes to VCluster to check if MPI_Finalize fail
parent
e34cc611
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
12 additions
and
7 deletions
+12
-7
src/VCluster.cpp
src/VCluster.cpp
+0
-3
src/VCluster.hpp
src/VCluster.hpp
+12
-4
No files found.
src/VCluster.cpp
View file @
46c6cf1a
...
...
@@ -2,8 +2,5 @@
Vcluster
*
global_v_cluster
=
NULL
;
// Global MPI initialization
bool
global_mpi_init
=
false
;
// number of vcluster instances
size_t
n_vcluster
=
0
;
src/VCluster.hpp
View file @
46c6cf1a
...
...
@@ -151,9 +151,15 @@ public:
{
std
::
cout
<<
"Finalize
\n
"
;
if
(
MPI_Finalize
()
!=
0
)
int
already_finalised
;
MPI_Finalized
(
&
already_finalised
);
if
(
!
already_finalised
)
{
std
::
cerr
<<
"DAMN!!!!!!!!
\n
"
;
if
(
MPI_Finalize
()
!=
0
)
{
std
::
cerr
<<
__FILE__
<<
":"
<<
__LINE__
<<
" MPI_Finalize FAILED
\n
"
;
}
}
}
}
...
...
@@ -168,12 +174,14 @@ public:
n_vcluster
++
;
int
already_initialised
;
MPI_Initialized
(
&
already_initialised
);
// Check if MPI is already initialized
if
(
global_mpi_init
==
false
)
if
(
!
already_initialised
)
{
MPI_Init
(
argc
,
argv
);
global_mpi_init
=
true
;
}
//! Get the total number of process
...
...
Write
Preview
Markdown
is supported
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