re PR libfortran/19308 (I/O library should support more real and integer kinds)

[thirdparty/gcc.git] / libgfortran / generated / maxval_r4.c

diff --git a/libgfortran/generated/maxval_r4.c b/libgfortran/generated/maxval_r4.c
index 6e4236caebd60afbc5370f3977289ddf23487f2b..4d56bbf5b163f90f073ed2f31e6dcb42890f56cd 100644 (file)
--- a/libgfortran/generated/maxval_r4.c
+++ b/libgfortran/generated/maxval_r4.c
@@ -35,6 +35,9 @@ Boston, MA 02110-1301, USA.  */
 #include "libgfortran.h"
 
 
+#if defined (HAVE_GFC_REAL_4) && defined (HAVE_GFC_REAL_4)
+
+
 extern void maxval_r4 (gfc_array_r4 *, gfc_array_r4 *, index_type *);
 export_proto(maxval_r4);
 
@@ -330,3 +333,4 @@ mmaxval_r4 (gfc_array_r4 * retarray, gfc_array_r4 * array,
     }
 }
 
+#endif