Skip to content

Commit 3401f60

Browse files
authored
build: remove interface in m4 check that causes false negatives with intel -warn flag (#1583)
1 parent 2b05550 commit 3401f60

File tree

1 file changed

+6
-8
lines changed

1 file changed

+6
-8
lines changed

m4/gx_fortran_options.m4

Lines changed: 6 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -90,13 +90,12 @@ for ac_flag in none \
9090
'-qrealsize=8'; do
9191
test "x$ac_flag" != xnone && FCFLAGS="$gx_fc_default_real_kind8_flag_FCFLAGS_save ${ac_flag}"
9292
AC_COMPILE_IFELSE([[ program test
93-
interface
93+
real :: b=1.0
94+
call test_sub(b)
95+
contains
9496
subroutine test_sub(a)
9597
real(kind=selected_real_kind(15,307)) :: a
9698
end subroutine test_sub
97-
end interface
98-
real :: b=1.0
99-
call test_sub(b)
10099
end program test]],
101100
[gx_cv_fc_default_real_kind8_flag=$ac_flag; break])
102101
done
@@ -148,13 +147,12 @@ for ac_flag in none \
148147
'-qrealsize=4'; do
149148
test "x$ac_flag" != xnone && FCFLAGS="$gx_fc_default_real_kind4_flag_FCFLAGS_save ${ac_flag}"
150149
AC_COMPILE_IFELSE([[ program test
151-
interface
150+
real :: b=1.0
151+
call test_sub(b)
152+
contains
152153
subroutine test_sub(a)
153154
real(kind=selected_real_kind(6, 37)) :: a
154155
end subroutine test_sub
155-
end interface
156-
real :: b=1.0
157-
call test_sub(b)
158156
end program test]],
159157
[gx_cv_fc_default_real_kind4_flag=$ac_flag; break])
160158
done

0 commit comments

Comments
 (0)