summaryrefslogtreecommitdiffstats
path: root/libgfortran/generated/maxloc1_8_r8.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/maxloc1_8_r8.c')
-rw-r--r--libgfortran/generated/maxloc1_8_r8.c15
1 files changed, 8 insertions, 7 deletions
diff --git a/libgfortran/generated/maxloc1_8_r8.c b/libgfortran/generated/maxloc1_8_r8.c
index 82e754c36e4..53a3b6e3b9a 100644
--- a/libgfortran/generated/maxloc1_8_r8.c
+++ b/libgfortran/generated/maxloc1_8_r8.c
@@ -27,11 +27,11 @@ Boston, MA 02111-1307, USA. */
#include "libgfortran.h"
-extern void __maxloc1_8_r8 (gfc_array_i8 *, gfc_array_r8 *, index_type *);
-export_proto_np(__maxloc1_8_r8);
+extern void maxloc1_8_r8 (gfc_array_i8 *, gfc_array_r8 *, index_type *);
+export_proto(maxloc1_8_r8);
void
-__maxloc1_8_r8 (gfc_array_i8 *retarray, gfc_array_r8 *array, index_type *pdim)
+maxloc1_8_r8 (gfc_array_i8 *retarray, gfc_array_r8 *array, index_type *pdim)
{
index_type count[GFC_MAX_DIMENSIONS - 1];
index_type extent[GFC_MAX_DIMENSIONS - 1];
@@ -157,12 +157,13 @@ __maxloc1_8_r8 (gfc_array_i8 *retarray, gfc_array_r8 *array, index_type *pdim)
}
-extern void __mmaxloc1_8_r8 (gfc_array_i8 *, gfc_array_r8 *, index_type *,
- gfc_array_l4 *);
-export_proto_np(__mmaxloc1_8_r8);
+extern void mmaxloc1_8_r8 (gfc_array_i8 *, gfc_array_r8 *, index_type *,
+ gfc_array_l4 *);
+export_proto(mmaxloc1_8_r8);
void
-__mmaxloc1_8_r8 (gfc_array_i8 * retarray, gfc_array_r8 * array, index_type *pdim, gfc_array_l4 * mask)
+mmaxloc1_8_r8 (gfc_array_i8 * retarray, gfc_array_r8 * 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