FindOpenMP: Use fixed form Fortran test program
This prevents the test program from failing when build as Fortran 77. Suggested-by: Alin Marin Elena <alinm.elena@gmail.com>
This commit is contained in:
parent
598a316154
commit
7d633ebfa0
|
@ -111,11 +111,11 @@ int main() {
|
||||||
# same in Fortran
|
# same in Fortran
|
||||||
set(OpenMP_Fortran_TEST_SOURCE
|
set(OpenMP_Fortran_TEST_SOURCE
|
||||||
"
|
"
|
||||||
program test
|
program test
|
||||||
use omp_lib
|
use omp_lib
|
||||||
integer :: n
|
integer :: n
|
||||||
n = omp_get_num_threads()
|
n = omp_get_num_threads()
|
||||||
end program test
|
end program test
|
||||||
"
|
"
|
||||||
)
|
)
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue