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

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

diff --git a/libgfortran/generated/sum_c4.c b/libgfortran/generated/sum_c4.c
index 88bd14debc49b50952426275008d0bb8c6aa186c..bb08a4b558d001bbdb4b323476497bef3acd2e06 100644 (file)
--- a/libgfortran/generated/sum_c4.c
+++ b/libgfortran/generated/sum_c4.c
@@ -34,6 +34,9 @@ Boston, MA 02110-1301, USA.  */
 #include "libgfortran.h"
 
 
+#if defined (HAVE_GFC_COMPLEX_4) && defined (HAVE_GFC_COMPLEX_4)
+
+
 extern void sum_c4 (gfc_array_c4 *, gfc_array_c4 *, index_type *);
 export_proto(sum_c4);
 
@@ -327,3 +330,5 @@ msum_c4 (gfc_array_c4 * retarray, gfc_array_c4 * array,
         }
     }
 }
+
+#endif