Detect whether the Fortran compiler handles #warning

Some compilers (gfortran) do not print the warning when the include
file is found through include paths, which makes the warning useless.
We enable the #warning if we detect that the compiler accepts it
and prints the warning we expect.


Signed-off-by: Joseph Schuchart <[email protected]>

Author: devreal

config/ompi_fortran_check_warning_deprecated.m4

@@ -0,0 +1,50 @@
+dnl -*- shell-script -*-
+dnl
+dnl Copyright (c) 2025      Stony Brook University. All rights reserved.
+dnl $COPYRIGHT$
+dnl
+dnl Additional copyrights may follow
+dnl
+dnl $HEADER$
+dnl
+
+# Check whether the fortran compiler produces a warning when
+# it encounters a #warning directive
+
+# OMPI_FORTRAN_CHECK_WARNING([action if found],
+#                            [action if not found])
+# ----------------------------------------------------
+AC_DEFUN([OMPI_FORTRAN_CHECK_WARNING],[
+    AS_VAR_PUSHDEF([warning_var], [ompi_cv_fortran_warning])
+
+    AC_CACHE_CHECK([if Fortran compiler supports preprocessor warnings], warning_var,
+        [
+        # check if the compiler provides a proper #warning
+        # some compilers (gfortran) do not show the warning if the file is found
+        # through an include path, so create a temporary directory and include file
+        OAC_VAR_SCOPE_PUSH(msg, dir)
+        AS_VAR_SET(dir, "tmp_includedir")
+        AS_VAR_SET(msg, "This is a deprecated file")
+        AS_MKDIR_P(AS_VAR_GET(dir))
+        echo "#warning $msg" > $dir/deprecated.h
+
+        echo "! -*- fortran -*-
+            program main
+                implicit none
+                include 'deprecated.h'
+            end program main
+        " > conftest.f
+        AS_IF([${FC} ${FCFLAGS} -c -I${PWD}/tmp_includedir conftest.f 2>conftest.err >conftest.out],
+              [ # compilation succeeded, check the produced output for the warning
+                AS_IF([grep "$msg" conftest.err conftest.out >/dev/null 2>/dev/null],
+                      [AS_VAR_SET(warning_var, "yes")],
+                      [AS_VAR_SET(warning_var, "no (missing warning)")],)],
+              [AS_VAR_SET(warning_var, "no (compilation failed)")])
+        OPAL_VAR_SCOPE_POP
+        rm -rf conftest.f conftest.err conftest.out $dir 2>/dev/null >/dev/null
+    ])
+    AC_MSG_RESULT([AS_VAR_GET(warning_var)])
+    AS_VAR_IF(warning_var, [yes], [$1], [$2])
+    AS_VAR_POPDEF([warning_var])dnl
+])
+

config/ompi_setup_fc.m4

@@ -16,6 +16,7 @@ dnl Copyright (c) 2007      Sun Microsystems, Inc.  All rights reserved.
 dnl Copyright (c) 2009-2020 Cisco Systems, Inc.  All rights reserved.
 dnl Copyright (c) 2015-2020 Research Organization for Information Science
 dnl                         and Technology (RIST).  All rights reserved.
+dnl Copyright (c) 2025      Stony Brook University. All rights reserved.
 dnl $COPYRIGHT$
 dnl
 dnl Additional copyrights may follow
@@ -43,7 +44,7 @@ AC_DEFUN_ONCE([_OMPI_SETUP_FC_COMPILER],[
     # Fortran compilers (excluding the f77 compiler names) from AC's
     # default list of compilers and use it here.  This is the main
     # reason we have an OMPI-ized version of the PROG_FC macro.
-    AC_PROG_FC([gfortran flang-new f95 fort xlf95 ifort ifc efc pgfortran pgf95 lf95 f90 xlf90 pgf90 epcf90 nagfor nvfortran])
+    AC_PROG_FC([gfortran flang-new flang f95 fort xlf95 ifort ifc efc pgfortran pgf95 lf95 f90 xlf90 pgf90 epcf90 nagfor nvfortran])
     FCFLAGS="$ompi_fcflags_save"
     OPAL_VAR_SCOPE_POP
 ])

config/ompi_setup_mpi_fortran.m4

@@ -55,26 +55,6 @@ AC_DEFUN([OMPI_SETUP_MPI_FORTRAN],[
     OMPI_FORTRAN_HAVE_F08_ASSUMED_RANK=0
     OMPI_FORTRAN_HAVE_PRIVATE=0
 
-    AC_MSG_CHECKING([if we should mark mpif.h bindings as deprecated])
-    AC_ARG_ENABLE([deprecate-mpif-h],
-                  [AS_HELP_STRING([--enable-deprecate-mpif-h],
-                                  [Mark the mpif.h bindings as deprecated (default: enabled)])])
-    if test "x$FC" != "xflang-new"; then
-        AC_MSG_RESULT([no (only for flang-new)])
-        OMPI_FORTRAN_DEPRECATE_MPIF_H=""
-    elif test "$enable_deprecate_mpif_h" = "no"; then
-        AC_MSG_RESULT([no])
-        OMPI_FORTRAN_DEPRECATE_MPIF_H=""
-    else
-        if test "$enable_deprecate_mpif_h" = "yes"; then
-            AC_MSG_RESULT([yes])
-        else
-            AC_MSG_RESULT([yes (default)])
-        fi
-        OMPI_FORTRAN_DEPRECATE_MPIF_H="#warning mpif.h is deprecated since MPI 4.1. Refer to MPI Sec. 19.1.4."
-    fi
-    AC_SUBST(OMPI_FORTRAN_DEPRECATE_MPIF_H)
-
     # These macros control symbol names for Fortran/C interoperability
     #
     OMPI_F08_SUFFIX="_f08"
@@ -397,6 +377,20 @@ end program]])],
           [OMPI_FORTRAN_BUILD_SIZEOF=0])
     AC_SUBST(OMPI_FORTRAN_BUILD_SIZEOF)
 
+    AC_ARG_ENABLE([deprecate-mpif-h],
+                  [AS_HELP_STRING([--enable-deprecate-mpif-h],
+                                  [Mark the mpif.h bindings as deprecated (default: enabled)])])
+    AS_IF([! test x"$enable_deprecate_mpif_h" = "xno"],
+            [OMPI_FORTRAN_CHECK_WARNING([enable_deprecate_mpif_h="yes"],
+                                        [enable_deprecate_mpif_h="no"])])
+    AC_MSG_CHECKING([if we mark mpif.h bindings as deprecated])
+    AS_IF([test "$enable_deprecate_mpif_h" = "yes"],
+            [OMPI_FORTRAN_DEPRECATE_MPIF_H="#warning mpif.h is deprecated since MPI 4.1. Refer to MPI Sec. 19.1.4."
+             AC_MSG_RESULT([yes])],
+            [OMPI_FORTRAN_DEPRECATE_MPIF_H=""
+             AC_MSG_RESULT([no])])
+    AC_SUBST(OMPI_FORTRAN_DEPRECATE_MPIF_H)
+
     #--------------------------------------------
     # Fortran use mpi or use mpi_f08 MPI bindings
     #--------------------------------------------