mirror/hdf5
2
0
Fork 0
mirror of https://github.com/HDFGroup/hdf5.git synced 2024-12-03 02:32:04 +08:00
Code Issues Packages Projects Releases Wiki Activity

Add back Find module and add support files

Browse Source
This commit is contained in:
Allen Byrne 2017-11-01 15:06:46 -05:00
parent f190509675
commit 21874ce5c2
7 changed files with 1544 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1461
config/cmake_ext_mod/FindMPI.cmake Normal file
View File

File diff suppressed because it is too large Load Diff

4
config/cmake_ext_mod/FindMPI/fortranparam_mpi.f90.in Normal file
View File

@ -0,0 +1,4 @@
program mpi_ver
@MPI_Fortran_INCLUDE_LINE@
print *, 'INFO:SUBARRAYS[', MPI_SUBARRAYS_SUPPORTED, ']-ASYNCPROT[', MPI_ASYNC_PROTECTS_NONBLOCKING, ']'
end program mpi_ver

19
config/cmake_ext_mod/FindMPI/libver_mpi.c Normal file
View File

@ -0,0 +1,19 @@
#include <mpi.h>
#ifdef __cplusplus
#include <cstdio>
#else
#include <stdio.h>
#endif
int main(int argc, char* argv[])
{
char mpilibver_str[MPI_MAX_LIBRARY_VERSION_STRING];
int mpilibver_len;
MPI_Get_library_version(mpilibver_str, &mpilibver_len);
#ifdef __cplusplus
std::puts(mpilibver_str);
#else
puts(mpilibver_str);
#endif
}

7
config/cmake_ext_mod/FindMPI/libver_mpi.f90.in Normal file
View File

@ -0,0 +1,7 @@
program mpi_ver
@MPI_Fortran_INCLUDE_LINE@
character(len=MPI_MAX_LIBRARY_VERSION_STRING) :: mpilibver_str
integer(kind=MPI_INTEGER_KIND) :: ierror, reslen
call MPI_GET_LIBRARY_VERSION(mpilibver_str, reslen, ierror)
print *, mpilibver_str
end program mpi_ver

10
config/cmake_ext_mod/FindMPI/mpiver.f90.in Normal file
View File

@ -0,0 +1,10 @@
program mpi_ver
@MPI_Fortran_INCLUDE_LINE@
integer(kind=kind(MPI_VERSION)), parameter :: zero = ichar('0')
character, dimension(17), parameter :: mpiver_str =&
(/ 'I', 'N', 'F', 'O', ':', 'M', 'P', 'I', '-', 'V', 'E', 'R', '[', &
char(zero + MPI_VERSION), &
'.', &
char(zero + MPI_SUBVERSION), ']' /)
print *, mpiver_str
end program mpi_ver

37
config/cmake_ext_mod/FindMPI/test_mpi.c Normal file
View File

@ -0,0 +1,37 @@
#include <mpi.h>
#ifdef __cplusplus
#include <cstdio>
#else
#include <stdio.h>
#endif
#if defined(MPI_VERSION) && defined(MPI_SUBVERSION)
const char mpiver_str[] = { 'I', 'N',
'F', 'O',
':', 'M',
'P', 'I',
'-', 'V',
'E', 'R',
'[', ('0' + MPI_VERSION),
'.', ('0' + MPI_SUBVERSION),
']', '\0' };
#endif
int main(int argc, char* argv[])
{
#if defined(MPI_VERSION) && defined(MPI_SUBVERSION)
#ifdef __cplusplus
std::puts(mpiver_str);
#else
puts(mpiver_str);
#endif
#endif
#ifdef TEST_MPI_MPICXX
MPI::MPI_Init(&argc, &argv);
MPI::MPI_Finalize();
#else
MPI_Init(&argc, &argv);
MPI_Finalize();
#endif
}

6
config/cmake_ext_mod/FindMPI/test_mpi.f90.in Normal file
View File

@ -0,0 +1,6 @@
program hello
@MPI_Fortran_INCLUDE_LINE@
integer@MPI_Fortran_INTEGER_LINE@ ierror
call MPI_INIT(ierror)
call MPI_FINALIZE(ierror)
end program