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:
Nils Gladitz 2014-11-20 14:54:11 +01:00
parent 598a316154
commit 7d633ebfa0
1 changed files with 5 additions and 5 deletions

View File

@ -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
" "
) )