summaryrefslogtreecommitdiff
path: root/libgfortran/generated/maxloc0_8_r8.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgfortran/generated/maxloc0_8_r8.c')
-rw-r--r--libgfortran/generated/maxloc0_8_r8.c13
1 files changed, 7 insertions, 6 deletions
diff --git a/libgfortran/generated/maxloc0_8_r8.c b/libgfortran/generated/maxloc0_8_r8.c
index cc3e8d5dc2e..d355893c844 100644
--- a/libgfortran/generated/maxloc0_8_r8.c
+++ b/libgfortran/generated/maxloc0_8_r8.c
@@ -28,11 +28,11 @@ Boston, MA 02111-1307, USA. */
-extern void __maxloc0_8_r8 (gfc_array_i8 * retarray, gfc_array_r8 *array);
-export_proto_np(__maxloc0_8_r8);
+extern void maxloc0_8_r8 (gfc_array_i8 * retarray, gfc_array_r8 *array);
+export_proto(maxloc0_8_r8);
void
-__maxloc0_8_r8 (gfc_array_i8 * retarray, gfc_array_r8 *array)
+maxloc0_8_r8 (gfc_array_i8 * retarray, gfc_array_r8 *array)
{
index_type count[GFC_MAX_DIMENSIONS];
index_type extent[GFC_MAX_DIMENSIONS];
@@ -122,11 +122,12 @@ __maxloc0_8_r8 (gfc_array_i8 * retarray, gfc_array_r8 *array)
}
-extern void __mmaxloc0_8_r8 (gfc_array_i8 *, gfc_array_r8 *, gfc_array_l4 *);
-export_proto_np(__mmaxloc0_8_r8);
+extern void mmaxloc0_8_r8 (gfc_array_i8 *, gfc_array_r8 *, gfc_array_l4 *);
+export_proto(mmaxloc0_8_r8);
void
-__mmaxloc0_8_r8 (gfc_array_i8 * retarray, gfc_array_r8 *array, gfc_array_l4 * mask)
+mmaxloc0_8_r8 (gfc_array_i8 * retarray, gfc_array_r8 *array,
+ gfc_array_l4 * mask)
{
index_type count[GFC_MAX_DIMENSIONS];
index_type extent[GFC_MAX_DIMENSIONS];