summaryrefslogtreecommitdiffstats
path: root/libgfortran/generated/sum_c4.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/sum_c4.c')
-rw-r--r--libgfortran/generated/sum_c4.c15
1 files changed, 8 insertions, 7 deletions
diff --git a/libgfortran/generated/sum_c4.c b/libgfortran/generated/sum_c4.c
index a4af04ada23..3a13f973ea7 100644
--- a/libgfortran/generated/sum_c4.c
+++ b/libgfortran/generated/sum_c4.c
@@ -25,11 +25,11 @@ Boston, MA 02111-1307, USA. */
#include "libgfortran.h"
-extern void __sum_c4 (gfc_array_c4 *, gfc_array_c4 *, index_type *);
-export_proto_np(__sum_c4);
+extern void sum_c4 (gfc_array_c4 *, gfc_array_c4 *, index_type *);
+export_proto(sum_c4);
void
-__sum_c4 (gfc_array_c4 *retarray, gfc_array_c4 *array, index_type *pdim)
+sum_c4 (gfc_array_c4 *retarray, gfc_array_c4 *array, index_type *pdim)
{
index_type count[GFC_MAX_DIMENSIONS - 1];
index_type extent[GFC_MAX_DIMENSIONS - 1];
@@ -149,12 +149,13 @@ __sum_c4 (gfc_array_c4 *retarray, gfc_array_c4 *array, index_type *pdim)
}
-extern void __msum_c4 (gfc_array_c4 *, gfc_array_c4 *, index_type *,
- gfc_array_l4 *);
-export_proto_np(__msum_c4);
+extern void msum_c4 (gfc_array_c4 *, gfc_array_c4 *, index_type *,
+ gfc_array_l4 *);
+export_proto(msum_c4);
void
-__msum_c4 (gfc_array_c4 * retarray, gfc_array_c4 * array, index_type *pdim, gfc_array_l4 * mask)
+msum_c4 (gfc_array_c4 * retarray, gfc_array_c4 * array,
+ index_type *pdim, gfc_array_l4 * mask)
{
index_type count[GFC_MAX_DIMENSIONS - 1];
index_type extent[GFC_MAX_DIMENSIONS - 1];
OpenPOWER on IntegriCloud