iresolve.c (gfc_resolve_all, [...]): Use PREFIX.

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

diff --git a/libgfortran/generated/product_i8.c b/libgfortran/generated/product_i8.c
index 0e5ac66ca2d138c876389d4a0828856fa739243b..16dab58ddf8f54b8f5b9ccfbff353c96631917cf 100644 (file)
--- a/libgfortran/generated/product_i8.c
+++ b/libgfortran/generated/product_i8.c
@@ -25,11 +25,11 @@ Boston, MA 02111-1307, USA.  */
 #include "libgfortran.h"
 
 
-extern void __product_i8 (gfc_array_i8 *, gfc_array_i8 *, index_type *);
-export_proto_np(__product_i8);
+extern void product_i8 (gfc_array_i8 *, gfc_array_i8 *, index_type *);
+export_proto(product_i8);
 
 void
-__product_i8 (gfc_array_i8 *retarray, gfc_array_i8 *array, index_type *pdim)
+product_i8 (gfc_array_i8 *retarray, gfc_array_i8 *array, index_type *pdim)
 {
   index_type count[GFC_MAX_DIMENSIONS - 1];
   index_type extent[GFC_MAX_DIMENSIONS - 1];
@@ -149,12 +149,13 @@ __product_i8 (gfc_array_i8 *retarray, gfc_array_i8 *array, index_type *pdim)
 }
 
 
-extern void __mproduct_i8 (gfc_array_i8 *, gfc_array_i8 *, index_type *,
-                                               gfc_array_l4 *);
-export_proto_np(__mproduct_i8);
+extern void mproduct_i8 (gfc_array_i8 *, gfc_array_i8 *, index_type *,
+                                              gfc_array_l4 *);
+export_proto(mproduct_i8);
 
 void
-__mproduct_i8 (gfc_array_i8 * retarray, gfc_array_i8 * array, index_type *pdim, gfc_array_l4 * mask)
+mproduct_i8 (gfc_array_i8 * retarray, gfc_array_i8 * array,
+                                 index_type *pdim, gfc_array_l4 * mask)
 {
   index_type count[GFC_MAX_DIMENSIONS - 1];
   index_type extent[GFC_MAX_DIMENSIONS - 1];