[gcc(refs/users/mikael/heads/refactor_descriptor_v08)] Régénération des fichiers générés
Mikael Morin
mikael@gcc.gnu.org
Sun Sep 14 16:37:32 GMT 2025
https://gcc.gnu.org/g:94b80b8b4b773be650a8a0b8284aac74da106b49
commit 94b80b8b4b773be650a8a0b8284aac74da106b49
Author: Mikael Morin <mikael@gcc.gnu.org>
Date: Mon Sep 8 16:10:23 2025 +0200
Régénération des fichiers générés
Régénération fichiers générés
Diff:
---
libgfortran/generated/all_l1.c | 4 ++--
libgfortran/generated/all_l16.c | 4 ++--
libgfortran/generated/all_l2.c | 4 ++--
libgfortran/generated/all_l4.c | 4 ++--
libgfortran/generated/all_l8.c | 4 ++--
libgfortran/generated/any_l1.c | 4 ++--
libgfortran/generated/any_l16.c | 4 ++--
libgfortran/generated/any_l2.c | 4 ++--
libgfortran/generated/any_l4.c | 4 ++--
libgfortran/generated/any_l8.c | 4 ++--
libgfortran/generated/count_16_l.c | 4 ++--
libgfortran/generated/count_1_l.c | 4 ++--
libgfortran/generated/count_2_l.c | 4 ++--
libgfortran/generated/count_4_l.c | 4 ++--
libgfortran/generated/count_8_l.c | 4 ++--
libgfortran/generated/findloc2_s1.c | 2 +-
libgfortran/generated/findloc2_s4.c | 2 +-
libgfortran/generated/iall_i1.c | 2 +-
libgfortran/generated/iall_i16.c | 2 +-
libgfortran/generated/iall_i2.c | 2 +-
libgfortran/generated/iall_i4.c | 2 +-
libgfortran/generated/iall_i8.c | 2 +-
libgfortran/generated/iany_i1.c | 2 +-
libgfortran/generated/iany_i16.c | 2 +-
libgfortran/generated/iany_i2.c | 2 +-
libgfortran/generated/iany_i4.c | 2 +-
libgfortran/generated/iany_i8.c | 2 +-
libgfortran/generated/iparity_i1.c | 2 +-
libgfortran/generated/iparity_i16.c | 2 +-
libgfortran/generated/iparity_i2.c | 2 +-
libgfortran/generated/iparity_i4.c | 2 +-
libgfortran/generated/iparity_i8.c | 2 +-
libgfortran/generated/maxloc0_16_i1.c | 12 ++++++------
libgfortran/generated/maxloc0_16_i16.c | 12 ++++++------
libgfortran/generated/maxloc0_16_i2.c | 12 ++++++------
libgfortran/generated/maxloc0_16_i4.c | 12 ++++++------
libgfortran/generated/maxloc0_16_i8.c | 12 ++++++------
libgfortran/generated/maxloc0_16_m1.c | 12 ++++++------
libgfortran/generated/maxloc0_16_m16.c | 12 ++++++------
libgfortran/generated/maxloc0_16_m2.c | 12 ++++++------
libgfortran/generated/maxloc0_16_m4.c | 12 ++++++------
libgfortran/generated/maxloc0_16_m8.c | 12 ++++++------
libgfortran/generated/maxloc0_16_r10.c | 12 ++++++------
libgfortran/generated/maxloc0_16_r16.c | 12 ++++++------
libgfortran/generated/maxloc0_16_r17.c | 12 ++++++------
libgfortran/generated/maxloc0_16_r4.c | 12 ++++++------
libgfortran/generated/maxloc0_16_r8.c | 12 ++++++------
libgfortran/generated/maxloc0_16_s1.c | 10 +++++-----
libgfortran/generated/maxloc0_16_s4.c | 10 +++++-----
libgfortran/generated/maxloc0_4_i1.c | 12 ++++++------
libgfortran/generated/maxloc0_4_i16.c | 12 ++++++------
libgfortran/generated/maxloc0_4_i2.c | 12 ++++++------
libgfortran/generated/maxloc0_4_i4.c | 12 ++++++------
libgfortran/generated/maxloc0_4_i8.c | 12 ++++++------
libgfortran/generated/maxloc0_4_m1.c | 12 ++++++------
libgfortran/generated/maxloc0_4_m16.c | 12 ++++++------
libgfortran/generated/maxloc0_4_m2.c | 12 ++++++------
libgfortran/generated/maxloc0_4_m4.c | 12 ++++++------
libgfortran/generated/maxloc0_4_m8.c | 12 ++++++------
libgfortran/generated/maxloc0_4_r10.c | 12 ++++++------
libgfortran/generated/maxloc0_4_r16.c | 12 ++++++------
libgfortran/generated/maxloc0_4_r17.c | 12 ++++++------
libgfortran/generated/maxloc0_4_r4.c | 12 ++++++------
libgfortran/generated/maxloc0_4_r8.c | 12 ++++++------
libgfortran/generated/maxloc0_4_s1.c | 10 +++++-----
libgfortran/generated/maxloc0_4_s4.c | 10 +++++-----
libgfortran/generated/maxloc0_8_i1.c | 12 ++++++------
libgfortran/generated/maxloc0_8_i16.c | 12 ++++++------
libgfortran/generated/maxloc0_8_i2.c | 12 ++++++------
libgfortran/generated/maxloc0_8_i4.c | 12 ++++++------
libgfortran/generated/maxloc0_8_i8.c | 12 ++++++------
libgfortran/generated/maxloc0_8_m1.c | 12 ++++++------
libgfortran/generated/maxloc0_8_m16.c | 12 ++++++------
libgfortran/generated/maxloc0_8_m2.c | 12 ++++++------
libgfortran/generated/maxloc0_8_m4.c | 12 ++++++------
libgfortran/generated/maxloc0_8_m8.c | 12 ++++++------
libgfortran/generated/maxloc0_8_r10.c | 12 ++++++------
libgfortran/generated/maxloc0_8_r16.c | 12 ++++++------
libgfortran/generated/maxloc0_8_r17.c | 12 ++++++------
libgfortran/generated/maxloc0_8_r4.c | 12 ++++++------
libgfortran/generated/maxloc0_8_r8.c | 12 ++++++------
libgfortran/generated/maxloc0_8_s1.c | 10 +++++-----
libgfortran/generated/maxloc0_8_s4.c | 10 +++++-----
libgfortran/generated/maxloc1_16_i1.c | 2 +-
libgfortran/generated/maxloc1_16_i16.c | 2 +-
libgfortran/generated/maxloc1_16_i2.c | 2 +-
libgfortran/generated/maxloc1_16_i4.c | 2 +-
libgfortran/generated/maxloc1_16_i8.c | 2 +-
libgfortran/generated/maxloc1_16_m1.c | 2 +-
libgfortran/generated/maxloc1_16_m16.c | 2 +-
libgfortran/generated/maxloc1_16_m2.c | 2 +-
libgfortran/generated/maxloc1_16_m4.c | 2 +-
libgfortran/generated/maxloc1_16_m8.c | 2 +-
libgfortran/generated/maxloc1_16_r10.c | 2 +-
libgfortran/generated/maxloc1_16_r16.c | 2 +-
libgfortran/generated/maxloc1_16_r17.c | 2 +-
libgfortran/generated/maxloc1_16_r4.c | 2 +-
libgfortran/generated/maxloc1_16_r8.c | 2 +-
libgfortran/generated/maxloc1_16_s1.c | 6 +++---
libgfortran/generated/maxloc1_16_s4.c | 6 +++---
libgfortran/generated/maxloc1_4_i1.c | 2 +-
libgfortran/generated/maxloc1_4_i16.c | 2 +-
libgfortran/generated/maxloc1_4_i2.c | 2 +-
libgfortran/generated/maxloc1_4_i4.c | 2 +-
libgfortran/generated/maxloc1_4_i8.c | 2 +-
libgfortran/generated/maxloc1_4_m1.c | 2 +-
libgfortran/generated/maxloc1_4_m16.c | 2 +-
libgfortran/generated/maxloc1_4_m2.c | 2 +-
libgfortran/generated/maxloc1_4_m4.c | 2 +-
libgfortran/generated/maxloc1_4_m8.c | 2 +-
libgfortran/generated/maxloc1_4_r10.c | 2 +-
libgfortran/generated/maxloc1_4_r16.c | 2 +-
libgfortran/generated/maxloc1_4_r17.c | 2 +-
libgfortran/generated/maxloc1_4_r4.c | 2 +-
libgfortran/generated/maxloc1_4_r8.c | 2 +-
libgfortran/generated/maxloc1_4_s1.c | 6 +++---
libgfortran/generated/maxloc1_4_s4.c | 6 +++---
libgfortran/generated/maxloc1_8_i1.c | 2 +-
libgfortran/generated/maxloc1_8_i16.c | 2 +-
libgfortran/generated/maxloc1_8_i2.c | 2 +-
libgfortran/generated/maxloc1_8_i4.c | 2 +-
libgfortran/generated/maxloc1_8_i8.c | 2 +-
libgfortran/generated/maxloc1_8_m1.c | 2 +-
libgfortran/generated/maxloc1_8_m16.c | 2 +-
libgfortran/generated/maxloc1_8_m2.c | 2 +-
libgfortran/generated/maxloc1_8_m4.c | 2 +-
libgfortran/generated/maxloc1_8_m8.c | 2 +-
libgfortran/generated/maxloc1_8_r10.c | 2 +-
libgfortran/generated/maxloc1_8_r16.c | 2 +-
libgfortran/generated/maxloc1_8_r17.c | 2 +-
libgfortran/generated/maxloc1_8_r4.c | 2 +-
libgfortran/generated/maxloc1_8_r8.c | 2 +-
libgfortran/generated/maxloc1_8_s1.c | 6 +++---
libgfortran/generated/maxloc1_8_s4.c | 6 +++---
libgfortran/generated/maxval1_s1.c | 12 ++++++------
libgfortran/generated/maxval1_s4.c | 12 ++++++------
libgfortran/generated/maxval_i1.c | 2 +-
libgfortran/generated/maxval_i16.c | 2 +-
libgfortran/generated/maxval_i2.c | 2 +-
libgfortran/generated/maxval_i4.c | 2 +-
libgfortran/generated/maxval_i8.c | 2 +-
libgfortran/generated/maxval_m1.c | 2 +-
libgfortran/generated/maxval_m16.c | 2 +-
libgfortran/generated/maxval_m2.c | 2 +-
libgfortran/generated/maxval_m4.c | 2 +-
libgfortran/generated/maxval_m8.c | 2 +-
libgfortran/generated/maxval_r10.c | 2 +-
libgfortran/generated/maxval_r16.c | 2 +-
libgfortran/generated/maxval_r17.c | 2 +-
libgfortran/generated/maxval_r4.c | 2 +-
libgfortran/generated/maxval_r8.c | 2 +-
libgfortran/generated/minloc0_16_i1.c | 12 ++++++------
libgfortran/generated/minloc0_16_i16.c | 12 ++++++------
libgfortran/generated/minloc0_16_i2.c | 12 ++++++------
libgfortran/generated/minloc0_16_i4.c | 12 ++++++------
libgfortran/generated/minloc0_16_i8.c | 12 ++++++------
libgfortran/generated/minloc0_16_m1.c | 12 ++++++------
libgfortran/generated/minloc0_16_m16.c | 12 ++++++------
libgfortran/generated/minloc0_16_m2.c | 12 ++++++------
libgfortran/generated/minloc0_16_m4.c | 12 ++++++------
libgfortran/generated/minloc0_16_m8.c | 12 ++++++------
libgfortran/generated/minloc0_16_r10.c | 12 ++++++------
libgfortran/generated/minloc0_16_r16.c | 12 ++++++------
libgfortran/generated/minloc0_16_r17.c | 12 ++++++------
libgfortran/generated/minloc0_16_r4.c | 12 ++++++------
libgfortran/generated/minloc0_16_r8.c | 12 ++++++------
libgfortran/generated/minloc0_16_s1.c | 10 +++++-----
libgfortran/generated/minloc0_16_s4.c | 10 +++++-----
libgfortran/generated/minloc0_4_i1.c | 12 ++++++------
libgfortran/generated/minloc0_4_i16.c | 12 ++++++------
libgfortran/generated/minloc0_4_i2.c | 12 ++++++------
libgfortran/generated/minloc0_4_i4.c | 12 ++++++------
libgfortran/generated/minloc0_4_i8.c | 12 ++++++------
libgfortran/generated/minloc0_4_m1.c | 12 ++++++------
libgfortran/generated/minloc0_4_m16.c | 12 ++++++------
libgfortran/generated/minloc0_4_m2.c | 12 ++++++------
libgfortran/generated/minloc0_4_m4.c | 12 ++++++------
libgfortran/generated/minloc0_4_m8.c | 12 ++++++------
libgfortran/generated/minloc0_4_r10.c | 12 ++++++------
libgfortran/generated/minloc0_4_r16.c | 12 ++++++------
libgfortran/generated/minloc0_4_r17.c | 12 ++++++------
libgfortran/generated/minloc0_4_r4.c | 12 ++++++------
libgfortran/generated/minloc0_4_r8.c | 12 ++++++------
libgfortran/generated/minloc0_4_s1.c | 10 +++++-----
libgfortran/generated/minloc0_4_s4.c | 10 +++++-----
libgfortran/generated/minloc0_8_i1.c | 12 ++++++------
libgfortran/generated/minloc0_8_i16.c | 12 ++++++------
libgfortran/generated/minloc0_8_i2.c | 12 ++++++------
libgfortran/generated/minloc0_8_i4.c | 12 ++++++------
libgfortran/generated/minloc0_8_i8.c | 12 ++++++------
libgfortran/generated/minloc0_8_m1.c | 12 ++++++------
libgfortran/generated/minloc0_8_m16.c | 12 ++++++------
libgfortran/generated/minloc0_8_m2.c | 12 ++++++------
libgfortran/generated/minloc0_8_m4.c | 12 ++++++------
libgfortran/generated/minloc0_8_m8.c | 12 ++++++------
libgfortran/generated/minloc0_8_r10.c | 12 ++++++------
libgfortran/generated/minloc0_8_r16.c | 12 ++++++------
libgfortran/generated/minloc0_8_r17.c | 12 ++++++------
libgfortran/generated/minloc0_8_r4.c | 12 ++++++------
libgfortran/generated/minloc0_8_r8.c | 12 ++++++------
libgfortran/generated/minloc0_8_s1.c | 10 +++++-----
libgfortran/generated/minloc0_8_s4.c | 10 +++++-----
libgfortran/generated/minloc1_16_i1.c | 2 +-
libgfortran/generated/minloc1_16_i16.c | 2 +-
libgfortran/generated/minloc1_16_i2.c | 2 +-
libgfortran/generated/minloc1_16_i4.c | 2 +-
libgfortran/generated/minloc1_16_i8.c | 2 +-
libgfortran/generated/minloc1_16_m1.c | 2 +-
libgfortran/generated/minloc1_16_m16.c | 2 +-
libgfortran/generated/minloc1_16_m2.c | 2 +-
libgfortran/generated/minloc1_16_m4.c | 2 +-
libgfortran/generated/minloc1_16_m8.c | 2 +-
libgfortran/generated/minloc1_16_r10.c | 2 +-
libgfortran/generated/minloc1_16_r16.c | 2 +-
libgfortran/generated/minloc1_16_r17.c | 2 +-
libgfortran/generated/minloc1_16_r4.c | 2 +-
libgfortran/generated/minloc1_16_r8.c | 2 +-
libgfortran/generated/minloc1_16_s1.c | 6 +++---
libgfortran/generated/minloc1_16_s4.c | 6 +++---
libgfortran/generated/minloc1_4_i1.c | 2 +-
libgfortran/generated/minloc1_4_i16.c | 2 +-
libgfortran/generated/minloc1_4_i2.c | 2 +-
libgfortran/generated/minloc1_4_i4.c | 2 +-
libgfortran/generated/minloc1_4_i8.c | 2 +-
libgfortran/generated/minloc1_4_m1.c | 2 +-
libgfortran/generated/minloc1_4_m16.c | 2 +-
libgfortran/generated/minloc1_4_m2.c | 2 +-
libgfortran/generated/minloc1_4_m4.c | 2 +-
libgfortran/generated/minloc1_4_m8.c | 2 +-
libgfortran/generated/minloc1_4_r10.c | 2 +-
libgfortran/generated/minloc1_4_r16.c | 2 +-
libgfortran/generated/minloc1_4_r17.c | 2 +-
libgfortran/generated/minloc1_4_r4.c | 2 +-
libgfortran/generated/minloc1_4_r8.c | 2 +-
libgfortran/generated/minloc1_4_s1.c | 6 +++---
libgfortran/generated/minloc1_4_s4.c | 6 +++---
libgfortran/generated/minloc1_8_i1.c | 2 +-
libgfortran/generated/minloc1_8_i16.c | 2 +-
libgfortran/generated/minloc1_8_i2.c | 2 +-
libgfortran/generated/minloc1_8_i4.c | 2 +-
libgfortran/generated/minloc1_8_i8.c | 2 +-
libgfortran/generated/minloc1_8_m1.c | 2 +-
libgfortran/generated/minloc1_8_m16.c | 2 +-
libgfortran/generated/minloc1_8_m2.c | 2 +-
libgfortran/generated/minloc1_8_m4.c | 2 +-
libgfortran/generated/minloc1_8_m8.c | 2 +-
libgfortran/generated/minloc1_8_r10.c | 2 +-
libgfortran/generated/minloc1_8_r16.c | 2 +-
libgfortran/generated/minloc1_8_r17.c | 2 +-
libgfortran/generated/minloc1_8_r4.c | 2 +-
libgfortran/generated/minloc1_8_r8.c | 2 +-
libgfortran/generated/minloc1_8_s1.c | 6 +++---
libgfortran/generated/minloc1_8_s4.c | 6 +++---
libgfortran/generated/minval1_s1.c | 12 ++++++------
libgfortran/generated/minval1_s4.c | 12 ++++++------
libgfortran/generated/minval_i1.c | 2 +-
libgfortran/generated/minval_i16.c | 2 +-
libgfortran/generated/minval_i2.c | 2 +-
libgfortran/generated/minval_i4.c | 2 +-
libgfortran/generated/minval_i8.c | 2 +-
libgfortran/generated/minval_m1.c | 2 +-
libgfortran/generated/minval_m16.c | 2 +-
libgfortran/generated/minval_m2.c | 2 +-
libgfortran/generated/minval_m4.c | 2 +-
libgfortran/generated/minval_m8.c | 2 +-
libgfortran/generated/minval_r10.c | 2 +-
libgfortran/generated/minval_r16.c | 2 +-
libgfortran/generated/minval_r17.c | 2 +-
libgfortran/generated/minval_r4.c | 2 +-
libgfortran/generated/minval_r8.c | 2 +-
libgfortran/generated/norm2_r10.c | 2 +-
libgfortran/generated/norm2_r16.c | 2 +-
libgfortran/generated/norm2_r17.c | 2 +-
libgfortran/generated/norm2_r4.c | 2 +-
libgfortran/generated/norm2_r8.c | 2 +-
libgfortran/generated/parity_l1.c | 2 +-
libgfortran/generated/parity_l16.c | 2 +-
libgfortran/generated/parity_l2.c | 2 +-
libgfortran/generated/parity_l4.c | 2 +-
libgfortran/generated/parity_l8.c | 2 +-
libgfortran/generated/product_c10.c | 2 +-
libgfortran/generated/product_c16.c | 2 +-
libgfortran/generated/product_c17.c | 2 +-
libgfortran/generated/product_c4.c | 2 +-
libgfortran/generated/product_c8.c | 2 +-
libgfortran/generated/product_i1.c | 2 +-
libgfortran/generated/product_i16.c | 2 +-
libgfortran/generated/product_i2.c | 2 +-
libgfortran/generated/product_i4.c | 2 +-
libgfortran/generated/product_i8.c | 2 +-
libgfortran/generated/product_r10.c | 2 +-
libgfortran/generated/product_r16.c | 2 +-
libgfortran/generated/product_r17.c | 2 +-
libgfortran/generated/product_r4.c | 2 +-
libgfortran/generated/product_r8.c | 2 +-
libgfortran/generated/sum_c10.c | 2 +-
libgfortran/generated/sum_c16.c | 2 +-
libgfortran/generated/sum_c17.c | 2 +-
libgfortran/generated/sum_c4.c | 2 +-
libgfortran/generated/sum_c8.c | 2 +-
libgfortran/generated/sum_i1.c | 2 +-
libgfortran/generated/sum_i16.c | 2 +-
libgfortran/generated/sum_i2.c | 2 +-
libgfortran/generated/sum_i4.c | 2 +-
libgfortran/generated/sum_i8.c | 2 +-
libgfortran/generated/sum_r10.c | 2 +-
libgfortran/generated/sum_r16.c | 2 +-
libgfortran/generated/sum_r17.c | 2 +-
libgfortran/generated/sum_r4.c | 2 +-
libgfortran/generated/sum_r8.c | 2 +-
310 files changed, 867 insertions(+), 867 deletions(-)
diff --git a/libgfortran/generated/all_l1.c b/libgfortran/generated/all_l1.c
index 218ebd9c56e6..61257324c080 100644
--- a/libgfortran/generated/all_l1.c
+++ b/libgfortran/generated/all_l1.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_1)
-extern void all_l1 (gfc_array_l1 * const restrict,
+extern void all_l1 (gfc_array_l1 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(all_l1);
void
-all_l1 (gfc_array_l1 * const restrict retarray,
+all_l1 (gfc_array_l1 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/all_l16.c b/libgfortran/generated/all_l16.c
index e474903c8715..43f1ee546f4f 100644
--- a/libgfortran/generated/all_l16.c
+++ b/libgfortran/generated/all_l16.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_16)
-extern void all_l16 (gfc_array_l16 * const restrict,
+extern void all_l16 (gfc_array_l16 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(all_l16);
void
-all_l16 (gfc_array_l16 * const restrict retarray,
+all_l16 (gfc_array_l16 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/all_l2.c b/libgfortran/generated/all_l2.c
index 752f37dafa94..50ba30923137 100644
--- a/libgfortran/generated/all_l2.c
+++ b/libgfortran/generated/all_l2.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_2)
-extern void all_l2 (gfc_array_l2 * const restrict,
+extern void all_l2 (gfc_array_l2 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(all_l2);
void
-all_l2 (gfc_array_l2 * const restrict retarray,
+all_l2 (gfc_array_l2 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/all_l4.c b/libgfortran/generated/all_l4.c
index 7ee73dce38e8..06b42fd417f7 100644
--- a/libgfortran/generated/all_l4.c
+++ b/libgfortran/generated/all_l4.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_4)
-extern void all_l4 (gfc_array_l4 * const restrict,
+extern void all_l4 (gfc_array_l4 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(all_l4);
void
-all_l4 (gfc_array_l4 * const restrict retarray,
+all_l4 (gfc_array_l4 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/all_l8.c b/libgfortran/generated/all_l8.c
index cb76145c31b3..46c83df5f513 100644
--- a/libgfortran/generated/all_l8.c
+++ b/libgfortran/generated/all_l8.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_8)
-extern void all_l8 (gfc_array_l8 * const restrict,
+extern void all_l8 (gfc_array_l8 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(all_l8);
void
-all_l8 (gfc_array_l8 * const restrict retarray,
+all_l8 (gfc_array_l8 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/any_l1.c b/libgfortran/generated/any_l1.c
index ef3584dea1a1..46e08798e21c 100644
--- a/libgfortran/generated/any_l1.c
+++ b/libgfortran/generated/any_l1.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_1)
-extern void any_l1 (gfc_array_l1 * const restrict,
+extern void any_l1 (gfc_array_l1 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(any_l1);
void
-any_l1 (gfc_array_l1 * const restrict retarray,
+any_l1 (gfc_array_l1 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/any_l16.c b/libgfortran/generated/any_l16.c
index 843769a7d5f9..1f38d9dc452c 100644
--- a/libgfortran/generated/any_l16.c
+++ b/libgfortran/generated/any_l16.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_16)
-extern void any_l16 (gfc_array_l16 * const restrict,
+extern void any_l16 (gfc_array_l16 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(any_l16);
void
-any_l16 (gfc_array_l16 * const restrict retarray,
+any_l16 (gfc_array_l16 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/any_l2.c b/libgfortran/generated/any_l2.c
index 0e2f85fb5f21..98207b2c2a2d 100644
--- a/libgfortran/generated/any_l2.c
+++ b/libgfortran/generated/any_l2.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_2)
-extern void any_l2 (gfc_array_l2 * const restrict,
+extern void any_l2 (gfc_array_l2 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(any_l2);
void
-any_l2 (gfc_array_l2 * const restrict retarray,
+any_l2 (gfc_array_l2 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/any_l4.c b/libgfortran/generated/any_l4.c
index a21c7e52e6cb..42e09c7d4661 100644
--- a/libgfortran/generated/any_l4.c
+++ b/libgfortran/generated/any_l4.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_4)
-extern void any_l4 (gfc_array_l4 * const restrict,
+extern void any_l4 (gfc_array_l4 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(any_l4);
void
-any_l4 (gfc_array_l4 * const restrict retarray,
+any_l4 (gfc_array_l4 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/any_l8.c b/libgfortran/generated/any_l8.c
index dc3d5a1f2591..000fbda5627e 100644
--- a/libgfortran/generated/any_l8.c
+++ b/libgfortran/generated/any_l8.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_8)
-extern void any_l8 (gfc_array_l8 * const restrict,
+extern void any_l8 (gfc_array_l8 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(any_l8);
void
-any_l8 (gfc_array_l8 * const restrict retarray,
+any_l8 (gfc_array_l8 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/count_16_l.c b/libgfortran/generated/count_16_l.c
index a17f36a853ea..1af2893c5b3c 100644
--- a/libgfortran/generated/count_16_l.c
+++ b/libgfortran/generated/count_16_l.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_16)
-extern void count_16_l (gfc_array_i16 * const restrict,
+extern void count_16_l (gfc_array_i16 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(count_16_l);
void
-count_16_l (gfc_array_i16 * const restrict retarray,
+count_16_l (gfc_array_i16 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/count_1_l.c b/libgfortran/generated/count_1_l.c
index c6df299d4203..00a8799d97f6 100644
--- a/libgfortran/generated/count_1_l.c
+++ b/libgfortran/generated/count_1_l.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_1)
-extern void count_1_l (gfc_array_i1 * const restrict,
+extern void count_1_l (gfc_array_i1 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(count_1_l);
void
-count_1_l (gfc_array_i1 * const restrict retarray,
+count_1_l (gfc_array_i1 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/count_2_l.c b/libgfortran/generated/count_2_l.c
index 14820b0be09d..3af433425198 100644
--- a/libgfortran/generated/count_2_l.c
+++ b/libgfortran/generated/count_2_l.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_2)
-extern void count_2_l (gfc_array_i2 * const restrict,
+extern void count_2_l (gfc_array_i2 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(count_2_l);
void
-count_2_l (gfc_array_i2 * const restrict retarray,
+count_2_l (gfc_array_i2 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/count_4_l.c b/libgfortran/generated/count_4_l.c
index d3c8f99b278b..59409bc25791 100644
--- a/libgfortran/generated/count_4_l.c
+++ b/libgfortran/generated/count_4_l.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_4)
-extern void count_4_l (gfc_array_i4 * const restrict,
+extern void count_4_l (gfc_array_i4 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(count_4_l);
void
-count_4_l (gfc_array_i4 * const restrict retarray,
+count_4_l (gfc_array_i4 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/count_8_l.c b/libgfortran/generated/count_8_l.c
index 1af39fbe32cb..dd00fcb0c1c5 100644
--- a/libgfortran/generated/count_8_l.c
+++ b/libgfortran/generated/count_8_l.c
@@ -29,12 +29,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_8)
-extern void count_8_l (gfc_array_i8 * const restrict,
+extern void count_8_l (gfc_array_i8 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(count_8_l);
void
-count_8_l (gfc_array_i8 * const restrict retarray,
+count_8_l (gfc_array_i8 * const restrict retarray,
gfc_array_l1 * const restrict array,
const index_type * const restrict pdim)
{
diff --git a/libgfortran/generated/findloc2_s1.c b/libgfortran/generated/findloc2_s1.c
index eeea821d83c5..b963ca5e0257 100644
--- a/libgfortran/generated/findloc2_s1.c
+++ b/libgfortran/generated/findloc2_s1.c
@@ -127,7 +127,7 @@ mfindloc2_s1 (gfc_array_s1 * const restrict array,
{
if (*mbase && (compare_string (len_array, (char *) src, len_value, (char *) value) == 0))
return i;
- src += sstride;
+ PTR_INCREMENT_BYTES (src, sstride);
mbase += mstride;
}
}
diff --git a/libgfortran/generated/findloc2_s4.c b/libgfortran/generated/findloc2_s4.c
index a336e34122aa..8e71d6145565 100644
--- a/libgfortran/generated/findloc2_s4.c
+++ b/libgfortran/generated/findloc2_s4.c
@@ -127,7 +127,7 @@ mfindloc2_s4 (gfc_array_s4 * const restrict array,
{
if (*mbase && (compare_string_char4 (len_array, src, len_value, value) == 0))
return i;
- src += sstride;
+ PTR_INCREMENT_BYTES (src, sstride);
mbase += mstride;
}
}
diff --git a/libgfortran/generated/iall_i1.c b/libgfortran/generated/iall_i1.c
index e1b246536cf8..78af49cc539c 100644
--- a/libgfortran/generated/iall_i1.c
+++ b/libgfortran/generated/iall_i1.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_1) && defined (HAVE_GFC_INTEGER_1)
-extern void iall_i1 (gfc_array_i1 * const restrict,
+extern void iall_i1 (gfc_array_i1 * const restrict,
gfc_array_i1 * const restrict, const index_type * const restrict);
export_proto(iall_i1);
diff --git a/libgfortran/generated/iall_i16.c b/libgfortran/generated/iall_i16.c
index 087faeb9f22d..7ec67f5e0e2c 100644
--- a/libgfortran/generated/iall_i16.c
+++ b/libgfortran/generated/iall_i16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_16) && defined (HAVE_GFC_INTEGER_16)
-extern void iall_i16 (gfc_array_i16 * const restrict,
+extern void iall_i16 (gfc_array_i16 * const restrict,
gfc_array_i16 * const restrict, const index_type * const restrict);
export_proto(iall_i16);
diff --git a/libgfortran/generated/iall_i2.c b/libgfortran/generated/iall_i2.c
index 5145a6deb22b..1d134f07d689 100644
--- a/libgfortran/generated/iall_i2.c
+++ b/libgfortran/generated/iall_i2.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_2) && defined (HAVE_GFC_INTEGER_2)
-extern void iall_i2 (gfc_array_i2 * const restrict,
+extern void iall_i2 (gfc_array_i2 * const restrict,
gfc_array_i2 * const restrict, const index_type * const restrict);
export_proto(iall_i2);
diff --git a/libgfortran/generated/iall_i4.c b/libgfortran/generated/iall_i4.c
index 234ed3ec7f62..691f60f7dec8 100644
--- a/libgfortran/generated/iall_i4.c
+++ b/libgfortran/generated/iall_i4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_4) && defined (HAVE_GFC_INTEGER_4)
-extern void iall_i4 (gfc_array_i4 * const restrict,
+extern void iall_i4 (gfc_array_i4 * const restrict,
gfc_array_i4 * const restrict, const index_type * const restrict);
export_proto(iall_i4);
diff --git a/libgfortran/generated/iall_i8.c b/libgfortran/generated/iall_i8.c
index 0e00cacb20ea..def7a2363796 100644
--- a/libgfortran/generated/iall_i8.c
+++ b/libgfortran/generated/iall_i8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_8) && defined (HAVE_GFC_INTEGER_8)
-extern void iall_i8 (gfc_array_i8 * const restrict,
+extern void iall_i8 (gfc_array_i8 * const restrict,
gfc_array_i8 * const restrict, const index_type * const restrict);
export_proto(iall_i8);
diff --git a/libgfortran/generated/iany_i1.c b/libgfortran/generated/iany_i1.c
index 1855635e37c0..0029f3b13610 100644
--- a/libgfortran/generated/iany_i1.c
+++ b/libgfortran/generated/iany_i1.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_1) && defined (HAVE_GFC_INTEGER_1)
-extern void iany_i1 (gfc_array_i1 * const restrict,
+extern void iany_i1 (gfc_array_i1 * const restrict,
gfc_array_i1 * const restrict, const index_type * const restrict);
export_proto(iany_i1);
diff --git a/libgfortran/generated/iany_i16.c b/libgfortran/generated/iany_i16.c
index 2d5b7bcb5171..f6636fff3120 100644
--- a/libgfortran/generated/iany_i16.c
+++ b/libgfortran/generated/iany_i16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_16) && defined (HAVE_GFC_INTEGER_16)
-extern void iany_i16 (gfc_array_i16 * const restrict,
+extern void iany_i16 (gfc_array_i16 * const restrict,
gfc_array_i16 * const restrict, const index_type * const restrict);
export_proto(iany_i16);
diff --git a/libgfortran/generated/iany_i2.c b/libgfortran/generated/iany_i2.c
index d332b3e02c72..dc6d0f4a3601 100644
--- a/libgfortran/generated/iany_i2.c
+++ b/libgfortran/generated/iany_i2.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_2) && defined (HAVE_GFC_INTEGER_2)
-extern void iany_i2 (gfc_array_i2 * const restrict,
+extern void iany_i2 (gfc_array_i2 * const restrict,
gfc_array_i2 * const restrict, const index_type * const restrict);
export_proto(iany_i2);
diff --git a/libgfortran/generated/iany_i4.c b/libgfortran/generated/iany_i4.c
index 6d42d19b384d..2bbb74bac44f 100644
--- a/libgfortran/generated/iany_i4.c
+++ b/libgfortran/generated/iany_i4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_4) && defined (HAVE_GFC_INTEGER_4)
-extern void iany_i4 (gfc_array_i4 * const restrict,
+extern void iany_i4 (gfc_array_i4 * const restrict,
gfc_array_i4 * const restrict, const index_type * const restrict);
export_proto(iany_i4);
diff --git a/libgfortran/generated/iany_i8.c b/libgfortran/generated/iany_i8.c
index d7af915c67fd..2b9a4ac7df44 100644
--- a/libgfortran/generated/iany_i8.c
+++ b/libgfortran/generated/iany_i8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_8) && defined (HAVE_GFC_INTEGER_8)
-extern void iany_i8 (gfc_array_i8 * const restrict,
+extern void iany_i8 (gfc_array_i8 * const restrict,
gfc_array_i8 * const restrict, const index_type * const restrict);
export_proto(iany_i8);
diff --git a/libgfortran/generated/iparity_i1.c b/libgfortran/generated/iparity_i1.c
index 5457494e81ac..3e5b40b1d339 100644
--- a/libgfortran/generated/iparity_i1.c
+++ b/libgfortran/generated/iparity_i1.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_1) && defined (HAVE_GFC_INTEGER_1)
-extern void iparity_i1 (gfc_array_i1 * const restrict,
+extern void iparity_i1 (gfc_array_i1 * const restrict,
gfc_array_i1 * const restrict, const index_type * const restrict);
export_proto(iparity_i1);
diff --git a/libgfortran/generated/iparity_i16.c b/libgfortran/generated/iparity_i16.c
index db02387c9b93..f2a1a576cd92 100644
--- a/libgfortran/generated/iparity_i16.c
+++ b/libgfortran/generated/iparity_i16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_16) && defined (HAVE_GFC_INTEGER_16)
-extern void iparity_i16 (gfc_array_i16 * const restrict,
+extern void iparity_i16 (gfc_array_i16 * const restrict,
gfc_array_i16 * const restrict, const index_type * const restrict);
export_proto(iparity_i16);
diff --git a/libgfortran/generated/iparity_i2.c b/libgfortran/generated/iparity_i2.c
index b37c27bfacb6..f24602adf005 100644
--- a/libgfortran/generated/iparity_i2.c
+++ b/libgfortran/generated/iparity_i2.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_2) && defined (HAVE_GFC_INTEGER_2)
-extern void iparity_i2 (gfc_array_i2 * const restrict,
+extern void iparity_i2 (gfc_array_i2 * const restrict,
gfc_array_i2 * const restrict, const index_type * const restrict);
export_proto(iparity_i2);
diff --git a/libgfortran/generated/iparity_i4.c b/libgfortran/generated/iparity_i4.c
index 08d1635af407..9398cb668747 100644
--- a/libgfortran/generated/iparity_i4.c
+++ b/libgfortran/generated/iparity_i4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_4) && defined (HAVE_GFC_INTEGER_4)
-extern void iparity_i4 (gfc_array_i4 * const restrict,
+extern void iparity_i4 (gfc_array_i4 * const restrict,
gfc_array_i4 * const restrict, const index_type * const restrict);
export_proto(iparity_i4);
diff --git a/libgfortran/generated/iparity_i8.c b/libgfortran/generated/iparity_i8.c
index 5b94641d8f5e..abaa4cac32f5 100644
--- a/libgfortran/generated/iparity_i8.c
+++ b/libgfortran/generated/iparity_i8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_8) && defined (HAVE_GFC_INTEGER_8)
-extern void iparity_i8 (gfc_array_i8 * const restrict,
+extern void iparity_i8 (gfc_array_i8 * const restrict,
gfc_array_i8 * const restrict, const index_type * const restrict);
export_proto(iparity_i8);
diff --git a/libgfortran/generated/maxloc0_16_i1.c b/libgfortran/generated/maxloc0_16_i1.c
index b744f3d92927..12bd15694817 100644
--- a/libgfortran/generated/maxloc0_16_i1.c
+++ b/libgfortran/generated/maxloc0_16_i1.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_1) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_i1 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_i1 (gfc_array_i16 * const restrict retarray,
gfc_array_i1 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_i1);
void
-maxloc0_16_i1 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_i1 (gfc_array_i16 * const restrict retarray,
gfc_array_i1 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_i1 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_i1 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_i1 (gfc_array_i16 * const restrict,
gfc_array_i1 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_i1);
void
-mmaxloc0_16_i1 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_i1 (gfc_array_i16 * const restrict retarray,
gfc_array_i1 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_i1 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_i1 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_i1 (gfc_array_i16 * const restrict,
gfc_array_i1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_i1);
void
-smaxloc0_16_i1 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_i1 (gfc_array_i16 * const restrict retarray,
gfc_array_i1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_i16.c b/libgfortran/generated/maxloc0_16_i16.c
index 0d4ca049019a..a42993dbf383 100644
--- a/libgfortran/generated/maxloc0_16_i16.c
+++ b/libgfortran/generated/maxloc0_16_i16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_16) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_i16 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_i16 (gfc_array_i16 * const restrict retarray,
gfc_array_i16 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_i16);
void
-maxloc0_16_i16 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_i16 (gfc_array_i16 * const restrict retarray,
gfc_array_i16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_i16 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_i16 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_i16 (gfc_array_i16 * const restrict,
gfc_array_i16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_i16);
void
-mmaxloc0_16_i16 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_i16 (gfc_array_i16 * const restrict retarray,
gfc_array_i16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_i16 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_i16 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_i16 (gfc_array_i16 * const restrict,
gfc_array_i16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_i16);
void
-smaxloc0_16_i16 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_i16 (gfc_array_i16 * const restrict retarray,
gfc_array_i16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_i2.c b/libgfortran/generated/maxloc0_16_i2.c
index ac1a992a79d7..b2b0335e7fa4 100644
--- a/libgfortran/generated/maxloc0_16_i2.c
+++ b/libgfortran/generated/maxloc0_16_i2.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_2) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_i2 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_i2 (gfc_array_i16 * const restrict retarray,
gfc_array_i2 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_i2);
void
-maxloc0_16_i2 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_i2 (gfc_array_i16 * const restrict retarray,
gfc_array_i2 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_i2 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_i2 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_i2 (gfc_array_i16 * const restrict,
gfc_array_i2 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_i2);
void
-mmaxloc0_16_i2 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_i2 (gfc_array_i16 * const restrict retarray,
gfc_array_i2 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_i2 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_i2 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_i2 (gfc_array_i16 * const restrict,
gfc_array_i2 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_i2);
void
-smaxloc0_16_i2 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_i2 (gfc_array_i16 * const restrict retarray,
gfc_array_i2 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_i4.c b/libgfortran/generated/maxloc0_16_i4.c
index bf8d53307928..2b20ad425fa5 100644
--- a/libgfortran/generated/maxloc0_16_i4.c
+++ b/libgfortran/generated/maxloc0_16_i4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_4) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_i4 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_i4 (gfc_array_i16 * const restrict retarray,
gfc_array_i4 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_i4);
void
-maxloc0_16_i4 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_i4 (gfc_array_i16 * const restrict retarray,
gfc_array_i4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_i4 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_i4 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_i4 (gfc_array_i16 * const restrict,
gfc_array_i4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_i4);
void
-mmaxloc0_16_i4 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_i4 (gfc_array_i16 * const restrict retarray,
gfc_array_i4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_i4 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_i4 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_i4 (gfc_array_i16 * const restrict,
gfc_array_i4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_i4);
void
-smaxloc0_16_i4 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_i4 (gfc_array_i16 * const restrict retarray,
gfc_array_i4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_i8.c b/libgfortran/generated/maxloc0_16_i8.c
index 63c07a0dbda3..3c4da380e0a3 100644
--- a/libgfortran/generated/maxloc0_16_i8.c
+++ b/libgfortran/generated/maxloc0_16_i8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_8) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_i8 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_i8 (gfc_array_i16 * const restrict retarray,
gfc_array_i8 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_i8);
void
-maxloc0_16_i8 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_i8 (gfc_array_i16 * const restrict retarray,
gfc_array_i8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_i8 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_i8 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_i8 (gfc_array_i16 * const restrict,
gfc_array_i8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_i8);
void
-mmaxloc0_16_i8 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_i8 (gfc_array_i16 * const restrict retarray,
gfc_array_i8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_i8 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_i8 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_i8 (gfc_array_i16 * const restrict,
gfc_array_i8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_i8);
void
-smaxloc0_16_i8 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_i8 (gfc_array_i16 * const restrict retarray,
gfc_array_i8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_m1.c b/libgfortran/generated/maxloc0_16_m1.c
index 33286ffed5e5..0e25b38ce24f 100644
--- a/libgfortran/generated/maxloc0_16_m1.c
+++ b/libgfortran/generated/maxloc0_16_m1.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_1) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_m1 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_m1 (gfc_array_i16 * const restrict retarray,
gfc_array_m1 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_m1);
void
-maxloc0_16_m1 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_m1 (gfc_array_i16 * const restrict retarray,
gfc_array_m1 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_m1 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_m1 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_m1 (gfc_array_i16 * const restrict,
gfc_array_m1 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_m1);
void
-mmaxloc0_16_m1 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_m1 (gfc_array_i16 * const restrict retarray,
gfc_array_m1 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_m1 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_m1 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_m1 (gfc_array_i16 * const restrict,
gfc_array_m1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_m1);
void
-smaxloc0_16_m1 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_m1 (gfc_array_i16 * const restrict retarray,
gfc_array_m1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_m16.c b/libgfortran/generated/maxloc0_16_m16.c
index 682144254126..2144a23008d2 100644
--- a/libgfortran/generated/maxloc0_16_m16.c
+++ b/libgfortran/generated/maxloc0_16_m16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_16) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_m16 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_m16 (gfc_array_i16 * const restrict retarray,
gfc_array_m16 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_m16);
void
-maxloc0_16_m16 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_m16 (gfc_array_i16 * const restrict retarray,
gfc_array_m16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_m16 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_m16 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_m16 (gfc_array_i16 * const restrict,
gfc_array_m16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_m16);
void
-mmaxloc0_16_m16 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_m16 (gfc_array_i16 * const restrict retarray,
gfc_array_m16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_m16 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_m16 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_m16 (gfc_array_i16 * const restrict,
gfc_array_m16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_m16);
void
-smaxloc0_16_m16 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_m16 (gfc_array_i16 * const restrict retarray,
gfc_array_m16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_m2.c b/libgfortran/generated/maxloc0_16_m2.c
index d2b1ec6910a1..1c42903505f6 100644
--- a/libgfortran/generated/maxloc0_16_m2.c
+++ b/libgfortran/generated/maxloc0_16_m2.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_2) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_m2 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_m2 (gfc_array_i16 * const restrict retarray,
gfc_array_m2 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_m2);
void
-maxloc0_16_m2 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_m2 (gfc_array_i16 * const restrict retarray,
gfc_array_m2 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_m2 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_m2 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_m2 (gfc_array_i16 * const restrict,
gfc_array_m2 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_m2);
void
-mmaxloc0_16_m2 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_m2 (gfc_array_i16 * const restrict retarray,
gfc_array_m2 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_m2 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_m2 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_m2 (gfc_array_i16 * const restrict,
gfc_array_m2 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_m2);
void
-smaxloc0_16_m2 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_m2 (gfc_array_i16 * const restrict retarray,
gfc_array_m2 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_m4.c b/libgfortran/generated/maxloc0_16_m4.c
index 133b9ed4481c..3777afebc9d0 100644
--- a/libgfortran/generated/maxloc0_16_m4.c
+++ b/libgfortran/generated/maxloc0_16_m4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_4) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_m4 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_m4 (gfc_array_i16 * const restrict retarray,
gfc_array_m4 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_m4);
void
-maxloc0_16_m4 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_m4 (gfc_array_i16 * const restrict retarray,
gfc_array_m4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_m4 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_m4 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_m4 (gfc_array_i16 * const restrict,
gfc_array_m4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_m4);
void
-mmaxloc0_16_m4 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_m4 (gfc_array_i16 * const restrict retarray,
gfc_array_m4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_m4 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_m4 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_m4 (gfc_array_i16 * const restrict,
gfc_array_m4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_m4);
void
-smaxloc0_16_m4 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_m4 (gfc_array_i16 * const restrict retarray,
gfc_array_m4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_m8.c b/libgfortran/generated/maxloc0_16_m8.c
index 5f5074f5dbf8..cd5b79d82ba8 100644
--- a/libgfortran/generated/maxloc0_16_m8.c
+++ b/libgfortran/generated/maxloc0_16_m8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_8) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_m8 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_m8 (gfc_array_i16 * const restrict retarray,
gfc_array_m8 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_m8);
void
-maxloc0_16_m8 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_m8 (gfc_array_i16 * const restrict retarray,
gfc_array_m8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_m8 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_m8 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_m8 (gfc_array_i16 * const restrict,
gfc_array_m8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_m8);
void
-mmaxloc0_16_m8 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_m8 (gfc_array_i16 * const restrict retarray,
gfc_array_m8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_m8 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_m8 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_m8 (gfc_array_i16 * const restrict,
gfc_array_m8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_m8);
void
-smaxloc0_16_m8 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_m8 (gfc_array_i16 * const restrict retarray,
gfc_array_m8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_r10.c b/libgfortran/generated/maxloc0_16_r10.c
index 476375298c81..f645055e0142 100644
--- a/libgfortran/generated/maxloc0_16_r10.c
+++ b/libgfortran/generated/maxloc0_16_r10.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_10) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_r10 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_r10 (gfc_array_i16 * const restrict retarray,
gfc_array_r10 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_r10);
void
-maxloc0_16_r10 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_r10 (gfc_array_i16 * const restrict retarray,
gfc_array_r10 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_r10 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_r10 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_r10 (gfc_array_i16 * const restrict,
gfc_array_r10 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_r10);
void
-mmaxloc0_16_r10 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_r10 (gfc_array_i16 * const restrict retarray,
gfc_array_r10 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_r10 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_r10 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_r10 (gfc_array_i16 * const restrict,
gfc_array_r10 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_r10);
void
-smaxloc0_16_r10 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_r10 (gfc_array_i16 * const restrict retarray,
gfc_array_r10 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_r16.c b/libgfortran/generated/maxloc0_16_r16.c
index a801c2df4627..34c6a53c8f14 100644
--- a/libgfortran/generated/maxloc0_16_r16.c
+++ b/libgfortran/generated/maxloc0_16_r16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_16) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_r16 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_r16 (gfc_array_i16 * const restrict retarray,
gfc_array_r16 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_r16);
void
-maxloc0_16_r16 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_r16 (gfc_array_i16 * const restrict retarray,
gfc_array_r16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_r16 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_r16 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_r16 (gfc_array_i16 * const restrict,
gfc_array_r16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_r16);
void
-mmaxloc0_16_r16 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_r16 (gfc_array_i16 * const restrict retarray,
gfc_array_r16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_r16 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_r16 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_r16 (gfc_array_i16 * const restrict,
gfc_array_r16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_r16);
void
-smaxloc0_16_r16 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_r16 (gfc_array_i16 * const restrict retarray,
gfc_array_r16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_r17.c b/libgfortran/generated/maxloc0_16_r17.c
index 187d5169870b..d8517996a002 100644
--- a/libgfortran/generated/maxloc0_16_r17.c
+++ b/libgfortran/generated/maxloc0_16_r17.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_17) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_r17 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_r17 (gfc_array_i16 * const restrict retarray,
gfc_array_r17 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_r17);
void
-maxloc0_16_r17 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_r17 (gfc_array_i16 * const restrict retarray,
gfc_array_r17 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_r17 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_r17 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_r17 (gfc_array_i16 * const restrict,
gfc_array_r17 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_r17);
void
-mmaxloc0_16_r17 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_r17 (gfc_array_i16 * const restrict retarray,
gfc_array_r17 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_r17 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_r17 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_r17 (gfc_array_i16 * const restrict,
gfc_array_r17 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_r17);
void
-smaxloc0_16_r17 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_r17 (gfc_array_i16 * const restrict retarray,
gfc_array_r17 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_r4.c b/libgfortran/generated/maxloc0_16_r4.c
index 0b0209c3e731..0c1e5eea3f16 100644
--- a/libgfortran/generated/maxloc0_16_r4.c
+++ b/libgfortran/generated/maxloc0_16_r4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_4) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_r4 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_r4 (gfc_array_i16 * const restrict retarray,
gfc_array_r4 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_r4);
void
-maxloc0_16_r4 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_r4 (gfc_array_i16 * const restrict retarray,
gfc_array_r4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_r4 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_r4 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_r4 (gfc_array_i16 * const restrict,
gfc_array_r4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_r4);
void
-mmaxloc0_16_r4 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_r4 (gfc_array_i16 * const restrict retarray,
gfc_array_r4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_r4 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_r4 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_r4 (gfc_array_i16 * const restrict,
gfc_array_r4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_r4);
void
-smaxloc0_16_r4 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_r4 (gfc_array_i16 * const restrict retarray,
gfc_array_r4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_r8.c b/libgfortran/generated/maxloc0_16_r8.c
index cda7799b3fa3..8762833c30d9 100644
--- a/libgfortran/generated/maxloc0_16_r8.c
+++ b/libgfortran/generated/maxloc0_16_r8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_8) && defined (HAVE_GFC_INTEGER_16)
-extern void maxloc0_16_r8 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_r8 (gfc_array_i16 * const restrict retarray,
gfc_array_r8 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_16_r8);
void
-maxloc0_16_r8 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_r8 (gfc_array_i16 * const restrict retarray,
gfc_array_r8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_16_r8 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mmaxloc0_16_r8 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_r8 (gfc_array_i16 * const restrict,
gfc_array_r8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_16_r8);
void
-mmaxloc0_16_r8 (gfc_array_i16 * const restrict retarray,
+mmaxloc0_16_r8 (gfc_array_i16 * const restrict retarray,
gfc_array_r8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_16_r8 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_r8 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_r8 (gfc_array_i16 * const restrict,
gfc_array_r8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_16_r8);
void
-smaxloc0_16_r8 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_r8 (gfc_array_i16 * const restrict retarray,
gfc_array_r8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_16_s1.c b/libgfortran/generated/maxloc0_16_s1.c
index 8fbbae5784df..b70eb131bf53 100644
--- a/libgfortran/generated/maxloc0_16_s1.c
+++ b/libgfortran/generated/maxloc0_16_s1.c
@@ -44,12 +44,12 @@ compare_fcn (const GFC_UINTEGER_1 *a, const GFC_UINTEGER_1 *b, gfc_charlen_type
}
-extern void maxloc0_16_s1 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_s1 (gfc_array_i16 * const restrict retarray,
gfc_array_s1 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len);
export_proto(maxloc0_16_s1);
void
-maxloc0_16_s1 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_s1 (gfc_array_i16 * const restrict retarray,
gfc_array_s1 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -151,7 +151,7 @@ maxloc0_16_s1 (gfc_array_i16 * const restrict retarray,
}
-extern void mmaxloc0_16_s1 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_s1 (gfc_array_i16 * const restrict,
gfc_array_s1 * const restrict, gfc_array_l1 * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(mmaxloc0_16_s1);
@@ -298,13 +298,13 @@ mmaxloc0_16_s1 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_s1 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_s1 (gfc_array_i16 * const restrict,
gfc_array_s1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(smaxloc0_16_s1);
void
-smaxloc0_16_s1 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_s1 (gfc_array_i16 * const restrict retarray,
gfc_array_s1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back,
gfc_charlen_type len)
diff --git a/libgfortran/generated/maxloc0_16_s4.c b/libgfortran/generated/maxloc0_16_s4.c
index 1291c38b3b01..f02298677b75 100644
--- a/libgfortran/generated/maxloc0_16_s4.c
+++ b/libgfortran/generated/maxloc0_16_s4.c
@@ -44,12 +44,12 @@ compare_fcn (const GFC_UINTEGER_4 *a, const GFC_UINTEGER_4 *b, gfc_charlen_type
}
-extern void maxloc0_16_s4 (gfc_array_i16 * const restrict retarray,
+extern void maxloc0_16_s4 (gfc_array_i16 * const restrict retarray,
gfc_array_s4 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len);
export_proto(maxloc0_16_s4);
void
-maxloc0_16_s4 (gfc_array_i16 * const restrict retarray,
+maxloc0_16_s4 (gfc_array_i16 * const restrict retarray,
gfc_array_s4 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -151,7 +151,7 @@ maxloc0_16_s4 (gfc_array_i16 * const restrict retarray,
}
-extern void mmaxloc0_16_s4 (gfc_array_i16 * const restrict,
+extern void mmaxloc0_16_s4 (gfc_array_i16 * const restrict,
gfc_array_s4 * const restrict, gfc_array_l1 * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(mmaxloc0_16_s4);
@@ -298,13 +298,13 @@ mmaxloc0_16_s4 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc0_16_s4 (gfc_array_i16 * const restrict,
+extern void smaxloc0_16_s4 (gfc_array_i16 * const restrict,
gfc_array_s4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(smaxloc0_16_s4);
void
-smaxloc0_16_s4 (gfc_array_i16 * const restrict retarray,
+smaxloc0_16_s4 (gfc_array_i16 * const restrict retarray,
gfc_array_s4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back,
gfc_charlen_type len)
diff --git a/libgfortran/generated/maxloc0_4_i1.c b/libgfortran/generated/maxloc0_4_i1.c
index 0dcf292a87f6..6b68e052675f 100644
--- a/libgfortran/generated/maxloc0_4_i1.c
+++ b/libgfortran/generated/maxloc0_4_i1.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_1) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_i1 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_i1 (gfc_array_i4 * const restrict retarray,
gfc_array_i1 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_i1);
void
-maxloc0_4_i1 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_i1 (gfc_array_i4 * const restrict retarray,
gfc_array_i1 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_i1 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_i1 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_i1 (gfc_array_i4 * const restrict,
gfc_array_i1 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_i1);
void
-mmaxloc0_4_i1 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_i1 (gfc_array_i4 * const restrict retarray,
gfc_array_i1 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_i1 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_i1 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_i1 (gfc_array_i4 * const restrict,
gfc_array_i1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_i1);
void
-smaxloc0_4_i1 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_i1 (gfc_array_i4 * const restrict retarray,
gfc_array_i1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_i16.c b/libgfortran/generated/maxloc0_4_i16.c
index 23125c107cfd..afe9c1808074 100644
--- a/libgfortran/generated/maxloc0_4_i16.c
+++ b/libgfortran/generated/maxloc0_4_i16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_16) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_i16 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_i16 (gfc_array_i4 * const restrict retarray,
gfc_array_i16 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_i16);
void
-maxloc0_4_i16 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_i16 (gfc_array_i4 * const restrict retarray,
gfc_array_i16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_i16 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_i16 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_i16 (gfc_array_i4 * const restrict,
gfc_array_i16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_i16);
void
-mmaxloc0_4_i16 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_i16 (gfc_array_i4 * const restrict retarray,
gfc_array_i16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_i16 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_i16 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_i16 (gfc_array_i4 * const restrict,
gfc_array_i16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_i16);
void
-smaxloc0_4_i16 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_i16 (gfc_array_i4 * const restrict retarray,
gfc_array_i16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_i2.c b/libgfortran/generated/maxloc0_4_i2.c
index c66db0f115ca..d2e40bd437b3 100644
--- a/libgfortran/generated/maxloc0_4_i2.c
+++ b/libgfortran/generated/maxloc0_4_i2.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_2) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_i2 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_i2 (gfc_array_i4 * const restrict retarray,
gfc_array_i2 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_i2);
void
-maxloc0_4_i2 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_i2 (gfc_array_i4 * const restrict retarray,
gfc_array_i2 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_i2 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_i2 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_i2 (gfc_array_i4 * const restrict,
gfc_array_i2 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_i2);
void
-mmaxloc0_4_i2 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_i2 (gfc_array_i4 * const restrict retarray,
gfc_array_i2 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_i2 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_i2 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_i2 (gfc_array_i4 * const restrict,
gfc_array_i2 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_i2);
void
-smaxloc0_4_i2 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_i2 (gfc_array_i4 * const restrict retarray,
gfc_array_i2 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_i4.c b/libgfortran/generated/maxloc0_4_i4.c
index 95f1a6c9af47..2b107169710a 100644
--- a/libgfortran/generated/maxloc0_4_i4.c
+++ b/libgfortran/generated/maxloc0_4_i4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_4) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_i4 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_i4 (gfc_array_i4 * const restrict retarray,
gfc_array_i4 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_i4);
void
-maxloc0_4_i4 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_i4 (gfc_array_i4 * const restrict retarray,
gfc_array_i4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_i4 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_i4 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_i4 (gfc_array_i4 * const restrict,
gfc_array_i4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_i4);
void
-mmaxloc0_4_i4 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_i4 (gfc_array_i4 * const restrict retarray,
gfc_array_i4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_i4 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_i4 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_i4 (gfc_array_i4 * const restrict,
gfc_array_i4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_i4);
void
-smaxloc0_4_i4 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_i4 (gfc_array_i4 * const restrict retarray,
gfc_array_i4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_i8.c b/libgfortran/generated/maxloc0_4_i8.c
index 20d8e9a4f109..4b563d203825 100644
--- a/libgfortran/generated/maxloc0_4_i8.c
+++ b/libgfortran/generated/maxloc0_4_i8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_8) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_i8 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_i8 (gfc_array_i4 * const restrict retarray,
gfc_array_i8 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_i8);
void
-maxloc0_4_i8 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_i8 (gfc_array_i4 * const restrict retarray,
gfc_array_i8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_i8 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_i8 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_i8 (gfc_array_i4 * const restrict,
gfc_array_i8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_i8);
void
-mmaxloc0_4_i8 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_i8 (gfc_array_i4 * const restrict retarray,
gfc_array_i8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_i8 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_i8 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_i8 (gfc_array_i4 * const restrict,
gfc_array_i8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_i8);
void
-smaxloc0_4_i8 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_i8 (gfc_array_i4 * const restrict retarray,
gfc_array_i8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_m1.c b/libgfortran/generated/maxloc0_4_m1.c
index e0764cc6ec5a..977ce2d25358 100644
--- a/libgfortran/generated/maxloc0_4_m1.c
+++ b/libgfortran/generated/maxloc0_4_m1.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_1) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_m1 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_m1 (gfc_array_i4 * const restrict retarray,
gfc_array_m1 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_m1);
void
-maxloc0_4_m1 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_m1 (gfc_array_i4 * const restrict retarray,
gfc_array_m1 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_m1 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_m1 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_m1 (gfc_array_i4 * const restrict,
gfc_array_m1 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_m1);
void
-mmaxloc0_4_m1 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_m1 (gfc_array_i4 * const restrict retarray,
gfc_array_m1 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_m1 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_m1 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_m1 (gfc_array_i4 * const restrict,
gfc_array_m1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_m1);
void
-smaxloc0_4_m1 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_m1 (gfc_array_i4 * const restrict retarray,
gfc_array_m1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_m16.c b/libgfortran/generated/maxloc0_4_m16.c
index eda3a7b6d49b..8b533ecff5fb 100644
--- a/libgfortran/generated/maxloc0_4_m16.c
+++ b/libgfortran/generated/maxloc0_4_m16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_16) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_m16 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_m16 (gfc_array_i4 * const restrict retarray,
gfc_array_m16 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_m16);
void
-maxloc0_4_m16 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_m16 (gfc_array_i4 * const restrict retarray,
gfc_array_m16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_m16 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_m16 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_m16 (gfc_array_i4 * const restrict,
gfc_array_m16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_m16);
void
-mmaxloc0_4_m16 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_m16 (gfc_array_i4 * const restrict retarray,
gfc_array_m16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_m16 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_m16 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_m16 (gfc_array_i4 * const restrict,
gfc_array_m16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_m16);
void
-smaxloc0_4_m16 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_m16 (gfc_array_i4 * const restrict retarray,
gfc_array_m16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_m2.c b/libgfortran/generated/maxloc0_4_m2.c
index 5f2fe09feb67..df96e730696c 100644
--- a/libgfortran/generated/maxloc0_4_m2.c
+++ b/libgfortran/generated/maxloc0_4_m2.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_2) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_m2 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_m2 (gfc_array_i4 * const restrict retarray,
gfc_array_m2 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_m2);
void
-maxloc0_4_m2 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_m2 (gfc_array_i4 * const restrict retarray,
gfc_array_m2 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_m2 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_m2 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_m2 (gfc_array_i4 * const restrict,
gfc_array_m2 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_m2);
void
-mmaxloc0_4_m2 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_m2 (gfc_array_i4 * const restrict retarray,
gfc_array_m2 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_m2 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_m2 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_m2 (gfc_array_i4 * const restrict,
gfc_array_m2 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_m2);
void
-smaxloc0_4_m2 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_m2 (gfc_array_i4 * const restrict retarray,
gfc_array_m2 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_m4.c b/libgfortran/generated/maxloc0_4_m4.c
index c17a2bb54d31..ab612e5d9087 100644
--- a/libgfortran/generated/maxloc0_4_m4.c
+++ b/libgfortran/generated/maxloc0_4_m4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_4) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_m4 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_m4 (gfc_array_i4 * const restrict retarray,
gfc_array_m4 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_m4);
void
-maxloc0_4_m4 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_m4 (gfc_array_i4 * const restrict retarray,
gfc_array_m4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_m4 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_m4 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_m4 (gfc_array_i4 * const restrict,
gfc_array_m4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_m4);
void
-mmaxloc0_4_m4 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_m4 (gfc_array_i4 * const restrict retarray,
gfc_array_m4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_m4 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_m4 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_m4 (gfc_array_i4 * const restrict,
gfc_array_m4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_m4);
void
-smaxloc0_4_m4 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_m4 (gfc_array_i4 * const restrict retarray,
gfc_array_m4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_m8.c b/libgfortran/generated/maxloc0_4_m8.c
index 39f578313a29..934553cb7ce6 100644
--- a/libgfortran/generated/maxloc0_4_m8.c
+++ b/libgfortran/generated/maxloc0_4_m8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_8) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_m8 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_m8 (gfc_array_i4 * const restrict retarray,
gfc_array_m8 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_m8);
void
-maxloc0_4_m8 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_m8 (gfc_array_i4 * const restrict retarray,
gfc_array_m8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_m8 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_m8 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_m8 (gfc_array_i4 * const restrict,
gfc_array_m8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_m8);
void
-mmaxloc0_4_m8 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_m8 (gfc_array_i4 * const restrict retarray,
gfc_array_m8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_m8 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_m8 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_m8 (gfc_array_i4 * const restrict,
gfc_array_m8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_m8);
void
-smaxloc0_4_m8 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_m8 (gfc_array_i4 * const restrict retarray,
gfc_array_m8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_r10.c b/libgfortran/generated/maxloc0_4_r10.c
index c8d5f6b3949f..5aa7ca6ce64c 100644
--- a/libgfortran/generated/maxloc0_4_r10.c
+++ b/libgfortran/generated/maxloc0_4_r10.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_10) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_r10 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_r10 (gfc_array_i4 * const restrict retarray,
gfc_array_r10 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_r10);
void
-maxloc0_4_r10 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_r10 (gfc_array_i4 * const restrict retarray,
gfc_array_r10 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_r10 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_r10 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_r10 (gfc_array_i4 * const restrict,
gfc_array_r10 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_r10);
void
-mmaxloc0_4_r10 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_r10 (gfc_array_i4 * const restrict retarray,
gfc_array_r10 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_r10 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_r10 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_r10 (gfc_array_i4 * const restrict,
gfc_array_r10 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_r10);
void
-smaxloc0_4_r10 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_r10 (gfc_array_i4 * const restrict retarray,
gfc_array_r10 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_r16.c b/libgfortran/generated/maxloc0_4_r16.c
index 24a0e265eb2d..d226b81f27ac 100644
--- a/libgfortran/generated/maxloc0_4_r16.c
+++ b/libgfortran/generated/maxloc0_4_r16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_16) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_r16 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_r16 (gfc_array_i4 * const restrict retarray,
gfc_array_r16 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_r16);
void
-maxloc0_4_r16 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_r16 (gfc_array_i4 * const restrict retarray,
gfc_array_r16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_r16 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_r16 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_r16 (gfc_array_i4 * const restrict,
gfc_array_r16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_r16);
void
-mmaxloc0_4_r16 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_r16 (gfc_array_i4 * const restrict retarray,
gfc_array_r16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_r16 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_r16 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_r16 (gfc_array_i4 * const restrict,
gfc_array_r16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_r16);
void
-smaxloc0_4_r16 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_r16 (gfc_array_i4 * const restrict retarray,
gfc_array_r16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_r17.c b/libgfortran/generated/maxloc0_4_r17.c
index 7e9d751bace0..875ae6bd7b1c 100644
--- a/libgfortran/generated/maxloc0_4_r17.c
+++ b/libgfortran/generated/maxloc0_4_r17.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_17) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_r17 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_r17 (gfc_array_i4 * const restrict retarray,
gfc_array_r17 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_r17);
void
-maxloc0_4_r17 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_r17 (gfc_array_i4 * const restrict retarray,
gfc_array_r17 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_r17 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_r17 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_r17 (gfc_array_i4 * const restrict,
gfc_array_r17 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_r17);
void
-mmaxloc0_4_r17 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_r17 (gfc_array_i4 * const restrict retarray,
gfc_array_r17 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_r17 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_r17 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_r17 (gfc_array_i4 * const restrict,
gfc_array_r17 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_r17);
void
-smaxloc0_4_r17 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_r17 (gfc_array_i4 * const restrict retarray,
gfc_array_r17 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_r4.c b/libgfortran/generated/maxloc0_4_r4.c
index aefb96338e9e..6c5f40780635 100644
--- a/libgfortran/generated/maxloc0_4_r4.c
+++ b/libgfortran/generated/maxloc0_4_r4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_4) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_r4 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_r4 (gfc_array_i4 * const restrict retarray,
gfc_array_r4 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_r4);
void
-maxloc0_4_r4 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_r4 (gfc_array_i4 * const restrict retarray,
gfc_array_r4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_r4 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_r4 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_r4 (gfc_array_i4 * const restrict,
gfc_array_r4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_r4);
void
-mmaxloc0_4_r4 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_r4 (gfc_array_i4 * const restrict retarray,
gfc_array_r4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_r4 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_r4 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_r4 (gfc_array_i4 * const restrict,
gfc_array_r4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_r4);
void
-smaxloc0_4_r4 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_r4 (gfc_array_i4 * const restrict retarray,
gfc_array_r4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_r8.c b/libgfortran/generated/maxloc0_4_r8.c
index 5295f1bf7533..ad5cb1196448 100644
--- a/libgfortran/generated/maxloc0_4_r8.c
+++ b/libgfortran/generated/maxloc0_4_r8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_8) && defined (HAVE_GFC_INTEGER_4)
-extern void maxloc0_4_r8 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_r8 (gfc_array_i4 * const restrict retarray,
gfc_array_r8 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_4_r8);
void
-maxloc0_4_r8 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_r8 (gfc_array_i4 * const restrict retarray,
gfc_array_r8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_4_r8 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mmaxloc0_4_r8 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_r8 (gfc_array_i4 * const restrict,
gfc_array_r8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_4_r8);
void
-mmaxloc0_4_r8 (gfc_array_i4 * const restrict retarray,
+mmaxloc0_4_r8 (gfc_array_i4 * const restrict retarray,
gfc_array_r8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_4_r8 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_r8 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_r8 (gfc_array_i4 * const restrict,
gfc_array_r8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_4_r8);
void
-smaxloc0_4_r8 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_r8 (gfc_array_i4 * const restrict retarray,
gfc_array_r8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_4_s1.c b/libgfortran/generated/maxloc0_4_s1.c
index d02e4eaf5a33..949e2602fc1c 100644
--- a/libgfortran/generated/maxloc0_4_s1.c
+++ b/libgfortran/generated/maxloc0_4_s1.c
@@ -44,12 +44,12 @@ compare_fcn (const GFC_UINTEGER_1 *a, const GFC_UINTEGER_1 *b, gfc_charlen_type
}
-extern void maxloc0_4_s1 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_s1 (gfc_array_i4 * const restrict retarray,
gfc_array_s1 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len);
export_proto(maxloc0_4_s1);
void
-maxloc0_4_s1 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_s1 (gfc_array_i4 * const restrict retarray,
gfc_array_s1 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -151,7 +151,7 @@ maxloc0_4_s1 (gfc_array_i4 * const restrict retarray,
}
-extern void mmaxloc0_4_s1 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_s1 (gfc_array_i4 * const restrict,
gfc_array_s1 * const restrict, gfc_array_l1 * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(mmaxloc0_4_s1);
@@ -298,13 +298,13 @@ mmaxloc0_4_s1 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_s1 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_s1 (gfc_array_i4 * const restrict,
gfc_array_s1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(smaxloc0_4_s1);
void
-smaxloc0_4_s1 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_s1 (gfc_array_i4 * const restrict retarray,
gfc_array_s1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back,
gfc_charlen_type len)
diff --git a/libgfortran/generated/maxloc0_4_s4.c b/libgfortran/generated/maxloc0_4_s4.c
index 0bfe00aae2d0..a83adb55e746 100644
--- a/libgfortran/generated/maxloc0_4_s4.c
+++ b/libgfortran/generated/maxloc0_4_s4.c
@@ -44,12 +44,12 @@ compare_fcn (const GFC_UINTEGER_4 *a, const GFC_UINTEGER_4 *b, gfc_charlen_type
}
-extern void maxloc0_4_s4 (gfc_array_i4 * const restrict retarray,
+extern void maxloc0_4_s4 (gfc_array_i4 * const restrict retarray,
gfc_array_s4 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len);
export_proto(maxloc0_4_s4);
void
-maxloc0_4_s4 (gfc_array_i4 * const restrict retarray,
+maxloc0_4_s4 (gfc_array_i4 * const restrict retarray,
gfc_array_s4 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -151,7 +151,7 @@ maxloc0_4_s4 (gfc_array_i4 * const restrict retarray,
}
-extern void mmaxloc0_4_s4 (gfc_array_i4 * const restrict,
+extern void mmaxloc0_4_s4 (gfc_array_i4 * const restrict,
gfc_array_s4 * const restrict, gfc_array_l1 * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(mmaxloc0_4_s4);
@@ -298,13 +298,13 @@ mmaxloc0_4_s4 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc0_4_s4 (gfc_array_i4 * const restrict,
+extern void smaxloc0_4_s4 (gfc_array_i4 * const restrict,
gfc_array_s4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(smaxloc0_4_s4);
void
-smaxloc0_4_s4 (gfc_array_i4 * const restrict retarray,
+smaxloc0_4_s4 (gfc_array_i4 * const restrict retarray,
gfc_array_s4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back,
gfc_charlen_type len)
diff --git a/libgfortran/generated/maxloc0_8_i1.c b/libgfortran/generated/maxloc0_8_i1.c
index c5847c6c3abd..77ecc21f5269 100644
--- a/libgfortran/generated/maxloc0_8_i1.c
+++ b/libgfortran/generated/maxloc0_8_i1.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_1) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_i1 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_i1 (gfc_array_i8 * const restrict retarray,
gfc_array_i1 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_i1);
void
-maxloc0_8_i1 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_i1 (gfc_array_i8 * const restrict retarray,
gfc_array_i1 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_i1 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_i1 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_i1 (gfc_array_i8 * const restrict,
gfc_array_i1 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_i1);
void
-mmaxloc0_8_i1 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_i1 (gfc_array_i8 * const restrict retarray,
gfc_array_i1 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_i1 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_i1 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_i1 (gfc_array_i8 * const restrict,
gfc_array_i1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_i1);
void
-smaxloc0_8_i1 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_i1 (gfc_array_i8 * const restrict retarray,
gfc_array_i1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_i16.c b/libgfortran/generated/maxloc0_8_i16.c
index ab111cb3347d..822c4b856117 100644
--- a/libgfortran/generated/maxloc0_8_i16.c
+++ b/libgfortran/generated/maxloc0_8_i16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_16) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_i16 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_i16 (gfc_array_i8 * const restrict retarray,
gfc_array_i16 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_i16);
void
-maxloc0_8_i16 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_i16 (gfc_array_i8 * const restrict retarray,
gfc_array_i16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_i16 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_i16 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_i16 (gfc_array_i8 * const restrict,
gfc_array_i16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_i16);
void
-mmaxloc0_8_i16 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_i16 (gfc_array_i8 * const restrict retarray,
gfc_array_i16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_i16 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_i16 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_i16 (gfc_array_i8 * const restrict,
gfc_array_i16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_i16);
void
-smaxloc0_8_i16 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_i16 (gfc_array_i8 * const restrict retarray,
gfc_array_i16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_i2.c b/libgfortran/generated/maxloc0_8_i2.c
index 723fbaac859e..311f88465944 100644
--- a/libgfortran/generated/maxloc0_8_i2.c
+++ b/libgfortran/generated/maxloc0_8_i2.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_2) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_i2 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_i2 (gfc_array_i8 * const restrict retarray,
gfc_array_i2 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_i2);
void
-maxloc0_8_i2 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_i2 (gfc_array_i8 * const restrict retarray,
gfc_array_i2 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_i2 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_i2 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_i2 (gfc_array_i8 * const restrict,
gfc_array_i2 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_i2);
void
-mmaxloc0_8_i2 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_i2 (gfc_array_i8 * const restrict retarray,
gfc_array_i2 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_i2 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_i2 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_i2 (gfc_array_i8 * const restrict,
gfc_array_i2 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_i2);
void
-smaxloc0_8_i2 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_i2 (gfc_array_i8 * const restrict retarray,
gfc_array_i2 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_i4.c b/libgfortran/generated/maxloc0_8_i4.c
index e8480e14e746..9146bf3634f9 100644
--- a/libgfortran/generated/maxloc0_8_i4.c
+++ b/libgfortran/generated/maxloc0_8_i4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_4) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_i4 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_i4 (gfc_array_i8 * const restrict retarray,
gfc_array_i4 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_i4);
void
-maxloc0_8_i4 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_i4 (gfc_array_i8 * const restrict retarray,
gfc_array_i4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_i4 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_i4 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_i4 (gfc_array_i8 * const restrict,
gfc_array_i4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_i4);
void
-mmaxloc0_8_i4 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_i4 (gfc_array_i8 * const restrict retarray,
gfc_array_i4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_i4 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_i4 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_i4 (gfc_array_i8 * const restrict,
gfc_array_i4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_i4);
void
-smaxloc0_8_i4 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_i4 (gfc_array_i8 * const restrict retarray,
gfc_array_i4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_i8.c b/libgfortran/generated/maxloc0_8_i8.c
index 485d6b4208c1..a7c6c3affad8 100644
--- a/libgfortran/generated/maxloc0_8_i8.c
+++ b/libgfortran/generated/maxloc0_8_i8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_8) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_i8 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_i8 (gfc_array_i8 * const restrict retarray,
gfc_array_i8 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_i8);
void
-maxloc0_8_i8 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_i8 (gfc_array_i8 * const restrict retarray,
gfc_array_i8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_i8 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_i8 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_i8 (gfc_array_i8 * const restrict,
gfc_array_i8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_i8);
void
-mmaxloc0_8_i8 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_i8 (gfc_array_i8 * const restrict retarray,
gfc_array_i8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_i8 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_i8 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_i8 (gfc_array_i8 * const restrict,
gfc_array_i8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_i8);
void
-smaxloc0_8_i8 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_i8 (gfc_array_i8 * const restrict retarray,
gfc_array_i8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_m1.c b/libgfortran/generated/maxloc0_8_m1.c
index 29accbec92b6..6dac2a58b57b 100644
--- a/libgfortran/generated/maxloc0_8_m1.c
+++ b/libgfortran/generated/maxloc0_8_m1.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_1) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_m1 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_m1 (gfc_array_i8 * const restrict retarray,
gfc_array_m1 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_m1);
void
-maxloc0_8_m1 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_m1 (gfc_array_i8 * const restrict retarray,
gfc_array_m1 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_m1 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_m1 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_m1 (gfc_array_i8 * const restrict,
gfc_array_m1 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_m1);
void
-mmaxloc0_8_m1 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_m1 (gfc_array_i8 * const restrict retarray,
gfc_array_m1 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_m1 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_m1 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_m1 (gfc_array_i8 * const restrict,
gfc_array_m1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_m1);
void
-smaxloc0_8_m1 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_m1 (gfc_array_i8 * const restrict retarray,
gfc_array_m1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_m16.c b/libgfortran/generated/maxloc0_8_m16.c
index 92abeea350f7..d7207848fbf9 100644
--- a/libgfortran/generated/maxloc0_8_m16.c
+++ b/libgfortran/generated/maxloc0_8_m16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_16) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_m16 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_m16 (gfc_array_i8 * const restrict retarray,
gfc_array_m16 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_m16);
void
-maxloc0_8_m16 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_m16 (gfc_array_i8 * const restrict retarray,
gfc_array_m16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_m16 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_m16 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_m16 (gfc_array_i8 * const restrict,
gfc_array_m16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_m16);
void
-mmaxloc0_8_m16 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_m16 (gfc_array_i8 * const restrict retarray,
gfc_array_m16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_m16 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_m16 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_m16 (gfc_array_i8 * const restrict,
gfc_array_m16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_m16);
void
-smaxloc0_8_m16 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_m16 (gfc_array_i8 * const restrict retarray,
gfc_array_m16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_m2.c b/libgfortran/generated/maxloc0_8_m2.c
index 6673551cefb9..5ce11dc29353 100644
--- a/libgfortran/generated/maxloc0_8_m2.c
+++ b/libgfortran/generated/maxloc0_8_m2.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_2) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_m2 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_m2 (gfc_array_i8 * const restrict retarray,
gfc_array_m2 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_m2);
void
-maxloc0_8_m2 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_m2 (gfc_array_i8 * const restrict retarray,
gfc_array_m2 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_m2 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_m2 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_m2 (gfc_array_i8 * const restrict,
gfc_array_m2 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_m2);
void
-mmaxloc0_8_m2 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_m2 (gfc_array_i8 * const restrict retarray,
gfc_array_m2 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_m2 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_m2 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_m2 (gfc_array_i8 * const restrict,
gfc_array_m2 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_m2);
void
-smaxloc0_8_m2 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_m2 (gfc_array_i8 * const restrict retarray,
gfc_array_m2 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_m4.c b/libgfortran/generated/maxloc0_8_m4.c
index 1655ee244996..1a76d7678318 100644
--- a/libgfortran/generated/maxloc0_8_m4.c
+++ b/libgfortran/generated/maxloc0_8_m4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_4) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_m4 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_m4 (gfc_array_i8 * const restrict retarray,
gfc_array_m4 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_m4);
void
-maxloc0_8_m4 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_m4 (gfc_array_i8 * const restrict retarray,
gfc_array_m4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_m4 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_m4 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_m4 (gfc_array_i8 * const restrict,
gfc_array_m4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_m4);
void
-mmaxloc0_8_m4 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_m4 (gfc_array_i8 * const restrict retarray,
gfc_array_m4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_m4 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_m4 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_m4 (gfc_array_i8 * const restrict,
gfc_array_m4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_m4);
void
-smaxloc0_8_m4 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_m4 (gfc_array_i8 * const restrict retarray,
gfc_array_m4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_m8.c b/libgfortran/generated/maxloc0_8_m8.c
index 325a0fe29601..5a46ecf61cd2 100644
--- a/libgfortran/generated/maxloc0_8_m8.c
+++ b/libgfortran/generated/maxloc0_8_m8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_8) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_m8 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_m8 (gfc_array_i8 * const restrict retarray,
gfc_array_m8 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_m8);
void
-maxloc0_8_m8 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_m8 (gfc_array_i8 * const restrict retarray,
gfc_array_m8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_m8 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_m8 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_m8 (gfc_array_i8 * const restrict,
gfc_array_m8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_m8);
void
-mmaxloc0_8_m8 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_m8 (gfc_array_i8 * const restrict retarray,
gfc_array_m8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_m8 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_m8 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_m8 (gfc_array_i8 * const restrict,
gfc_array_m8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_m8);
void
-smaxloc0_8_m8 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_m8 (gfc_array_i8 * const restrict retarray,
gfc_array_m8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_r10.c b/libgfortran/generated/maxloc0_8_r10.c
index 7bcea7cd2e38..d1949a25b482 100644
--- a/libgfortran/generated/maxloc0_8_r10.c
+++ b/libgfortran/generated/maxloc0_8_r10.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_10) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_r10 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_r10 (gfc_array_i8 * const restrict retarray,
gfc_array_r10 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_r10);
void
-maxloc0_8_r10 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_r10 (gfc_array_i8 * const restrict retarray,
gfc_array_r10 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_r10 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_r10 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_r10 (gfc_array_i8 * const restrict,
gfc_array_r10 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_r10);
void
-mmaxloc0_8_r10 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_r10 (gfc_array_i8 * const restrict retarray,
gfc_array_r10 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_r10 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_r10 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_r10 (gfc_array_i8 * const restrict,
gfc_array_r10 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_r10);
void
-smaxloc0_8_r10 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_r10 (gfc_array_i8 * const restrict retarray,
gfc_array_r10 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_r16.c b/libgfortran/generated/maxloc0_8_r16.c
index 6ad254bedbff..bb8443e69985 100644
--- a/libgfortran/generated/maxloc0_8_r16.c
+++ b/libgfortran/generated/maxloc0_8_r16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_16) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_r16 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_r16 (gfc_array_i8 * const restrict retarray,
gfc_array_r16 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_r16);
void
-maxloc0_8_r16 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_r16 (gfc_array_i8 * const restrict retarray,
gfc_array_r16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_r16 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_r16 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_r16 (gfc_array_i8 * const restrict,
gfc_array_r16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_r16);
void
-mmaxloc0_8_r16 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_r16 (gfc_array_i8 * const restrict retarray,
gfc_array_r16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_r16 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_r16 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_r16 (gfc_array_i8 * const restrict,
gfc_array_r16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_r16);
void
-smaxloc0_8_r16 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_r16 (gfc_array_i8 * const restrict retarray,
gfc_array_r16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_r17.c b/libgfortran/generated/maxloc0_8_r17.c
index da4a8afe446b..cfdae81550eb 100644
--- a/libgfortran/generated/maxloc0_8_r17.c
+++ b/libgfortran/generated/maxloc0_8_r17.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_17) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_r17 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_r17 (gfc_array_i8 * const restrict retarray,
gfc_array_r17 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_r17);
void
-maxloc0_8_r17 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_r17 (gfc_array_i8 * const restrict retarray,
gfc_array_r17 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_r17 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_r17 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_r17 (gfc_array_i8 * const restrict,
gfc_array_r17 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_r17);
void
-mmaxloc0_8_r17 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_r17 (gfc_array_i8 * const restrict retarray,
gfc_array_r17 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_r17 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_r17 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_r17 (gfc_array_i8 * const restrict,
gfc_array_r17 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_r17);
void
-smaxloc0_8_r17 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_r17 (gfc_array_i8 * const restrict retarray,
gfc_array_r17 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_r4.c b/libgfortran/generated/maxloc0_8_r4.c
index 1aff2de92bb1..641d6835e6ea 100644
--- a/libgfortran/generated/maxloc0_8_r4.c
+++ b/libgfortran/generated/maxloc0_8_r4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_4) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_r4 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_r4 (gfc_array_i8 * const restrict retarray,
gfc_array_r4 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_r4);
void
-maxloc0_8_r4 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_r4 (gfc_array_i8 * const restrict retarray,
gfc_array_r4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_r4 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_r4 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_r4 (gfc_array_i8 * const restrict,
gfc_array_r4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_r4);
void
-mmaxloc0_8_r4 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_r4 (gfc_array_i8 * const restrict retarray,
gfc_array_r4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_r4 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_r4 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_r4 (gfc_array_i8 * const restrict,
gfc_array_r4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_r4);
void
-smaxloc0_8_r4 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_r4 (gfc_array_i8 * const restrict retarray,
gfc_array_r4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_r8.c b/libgfortran/generated/maxloc0_8_r8.c
index 8989c8380fc8..6ee6c2eb71ff 100644
--- a/libgfortran/generated/maxloc0_8_r8.c
+++ b/libgfortran/generated/maxloc0_8_r8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_8) && defined (HAVE_GFC_INTEGER_8)
-extern void maxloc0_8_r8 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_r8 (gfc_array_i8 * const restrict retarray,
gfc_array_r8 * const restrict array, GFC_LOGICAL_4);
export_proto(maxloc0_8_r8);
void
-maxloc0_8_r8 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_r8 (gfc_array_i8 * const restrict retarray,
gfc_array_r8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ maxloc0_8_r8 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mmaxloc0_8_r8 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_r8 (gfc_array_i8 * const restrict,
gfc_array_r8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mmaxloc0_8_r8);
void
-mmaxloc0_8_r8 (gfc_array_i8 * const restrict retarray,
+mmaxloc0_8_r8 (gfc_array_i8 * const restrict retarray,
gfc_array_r8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -362,12 +362,12 @@ mmaxloc0_8_r8 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_r8 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_r8 (gfc_array_i8 * const restrict,
gfc_array_r8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(smaxloc0_8_r8);
void
-smaxloc0_8_r8 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_r8 (gfc_array_i8 * const restrict retarray,
gfc_array_r8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/maxloc0_8_s1.c b/libgfortran/generated/maxloc0_8_s1.c
index b9b51cba0253..0ddb5409d660 100644
--- a/libgfortran/generated/maxloc0_8_s1.c
+++ b/libgfortran/generated/maxloc0_8_s1.c
@@ -44,12 +44,12 @@ compare_fcn (const GFC_UINTEGER_1 *a, const GFC_UINTEGER_1 *b, gfc_charlen_type
}
-extern void maxloc0_8_s1 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_s1 (gfc_array_i8 * const restrict retarray,
gfc_array_s1 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len);
export_proto(maxloc0_8_s1);
void
-maxloc0_8_s1 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_s1 (gfc_array_i8 * const restrict retarray,
gfc_array_s1 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -151,7 +151,7 @@ maxloc0_8_s1 (gfc_array_i8 * const restrict retarray,
}
-extern void mmaxloc0_8_s1 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_s1 (gfc_array_i8 * const restrict,
gfc_array_s1 * const restrict, gfc_array_l1 * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(mmaxloc0_8_s1);
@@ -298,13 +298,13 @@ mmaxloc0_8_s1 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_s1 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_s1 (gfc_array_i8 * const restrict,
gfc_array_s1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(smaxloc0_8_s1);
void
-smaxloc0_8_s1 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_s1 (gfc_array_i8 * const restrict retarray,
gfc_array_s1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back,
gfc_charlen_type len)
diff --git a/libgfortran/generated/maxloc0_8_s4.c b/libgfortran/generated/maxloc0_8_s4.c
index a014338fa578..86ff658aac68 100644
--- a/libgfortran/generated/maxloc0_8_s4.c
+++ b/libgfortran/generated/maxloc0_8_s4.c
@@ -44,12 +44,12 @@ compare_fcn (const GFC_UINTEGER_4 *a, const GFC_UINTEGER_4 *b, gfc_charlen_type
}
-extern void maxloc0_8_s4 (gfc_array_i8 * const restrict retarray,
+extern void maxloc0_8_s4 (gfc_array_i8 * const restrict retarray,
gfc_array_s4 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len);
export_proto(maxloc0_8_s4);
void
-maxloc0_8_s4 (gfc_array_i8 * const restrict retarray,
+maxloc0_8_s4 (gfc_array_i8 * const restrict retarray,
gfc_array_s4 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -151,7 +151,7 @@ maxloc0_8_s4 (gfc_array_i8 * const restrict retarray,
}
-extern void mmaxloc0_8_s4 (gfc_array_i8 * const restrict,
+extern void mmaxloc0_8_s4 (gfc_array_i8 * const restrict,
gfc_array_s4 * const restrict, gfc_array_l1 * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(mmaxloc0_8_s4);
@@ -298,13 +298,13 @@ mmaxloc0_8_s4 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc0_8_s4 (gfc_array_i8 * const restrict,
+extern void smaxloc0_8_s4 (gfc_array_i8 * const restrict,
gfc_array_s4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(smaxloc0_8_s4);
void
-smaxloc0_8_s4 (gfc_array_i8 * const restrict retarray,
+smaxloc0_8_s4 (gfc_array_i8 * const restrict retarray,
gfc_array_s4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back,
gfc_charlen_type len)
diff --git a/libgfortran/generated/maxloc1_16_i1.c b/libgfortran/generated/maxloc1_16_i1.c
index 57556c76e5c0..682d5f9f6b50 100644
--- a/libgfortran/generated/maxloc1_16_i1.c
+++ b/libgfortran/generated/maxloc1_16_i1.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_i1 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_i1 (gfc_array_i16 * const restrict,
gfc_array_i1 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_i1);
diff --git a/libgfortran/generated/maxloc1_16_i16.c b/libgfortran/generated/maxloc1_16_i16.c
index ec049ccab29b..709f093beee3 100644
--- a/libgfortran/generated/maxloc1_16_i16.c
+++ b/libgfortran/generated/maxloc1_16_i16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_i16 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_i16 (gfc_array_i16 * const restrict,
gfc_array_i16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_i16);
diff --git a/libgfortran/generated/maxloc1_16_i2.c b/libgfortran/generated/maxloc1_16_i2.c
index 43734bc342a9..90c3fe0d0d20 100644
--- a/libgfortran/generated/maxloc1_16_i2.c
+++ b/libgfortran/generated/maxloc1_16_i2.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_i2 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_i2 (gfc_array_i16 * const restrict,
gfc_array_i2 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_i2);
diff --git a/libgfortran/generated/maxloc1_16_i4.c b/libgfortran/generated/maxloc1_16_i4.c
index c04c2332aa98..8c4f6cd63d4d 100644
--- a/libgfortran/generated/maxloc1_16_i4.c
+++ b/libgfortran/generated/maxloc1_16_i4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_i4 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_i4 (gfc_array_i16 * const restrict,
gfc_array_i4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_i4);
diff --git a/libgfortran/generated/maxloc1_16_i8.c b/libgfortran/generated/maxloc1_16_i8.c
index 9552fc38dd5d..8efcf94aad3b 100644
--- a/libgfortran/generated/maxloc1_16_i8.c
+++ b/libgfortran/generated/maxloc1_16_i8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_i8 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_i8 (gfc_array_i16 * const restrict,
gfc_array_i8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_i8);
diff --git a/libgfortran/generated/maxloc1_16_m1.c b/libgfortran/generated/maxloc1_16_m1.c
index e8ab37977d68..ec4dd8b8026c 100644
--- a/libgfortran/generated/maxloc1_16_m1.c
+++ b/libgfortran/generated/maxloc1_16_m1.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_m1 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_m1 (gfc_array_i16 * const restrict,
gfc_array_m1 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_m1);
diff --git a/libgfortran/generated/maxloc1_16_m16.c b/libgfortran/generated/maxloc1_16_m16.c
index 1d08de92d288..eef8f3d8b90c 100644
--- a/libgfortran/generated/maxloc1_16_m16.c
+++ b/libgfortran/generated/maxloc1_16_m16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_m16 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_m16 (gfc_array_i16 * const restrict,
gfc_array_m16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_m16);
diff --git a/libgfortran/generated/maxloc1_16_m2.c b/libgfortran/generated/maxloc1_16_m2.c
index ae2d5bc0e534..d393f99dd261 100644
--- a/libgfortran/generated/maxloc1_16_m2.c
+++ b/libgfortran/generated/maxloc1_16_m2.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_m2 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_m2 (gfc_array_i16 * const restrict,
gfc_array_m2 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_m2);
diff --git a/libgfortran/generated/maxloc1_16_m4.c b/libgfortran/generated/maxloc1_16_m4.c
index 672f7acff2cd..92c3c82016d3 100644
--- a/libgfortran/generated/maxloc1_16_m4.c
+++ b/libgfortran/generated/maxloc1_16_m4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_m4 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_m4 (gfc_array_i16 * const restrict,
gfc_array_m4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_m4);
diff --git a/libgfortran/generated/maxloc1_16_m8.c b/libgfortran/generated/maxloc1_16_m8.c
index 56e3838306fc..35e5972d5bc9 100644
--- a/libgfortran/generated/maxloc1_16_m8.c
+++ b/libgfortran/generated/maxloc1_16_m8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_m8 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_m8 (gfc_array_i16 * const restrict,
gfc_array_m8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_m8);
diff --git a/libgfortran/generated/maxloc1_16_r10.c b/libgfortran/generated/maxloc1_16_r10.c
index 3b5e8c79b7ce..f824b1fed152 100644
--- a/libgfortran/generated/maxloc1_16_r10.c
+++ b/libgfortran/generated/maxloc1_16_r10.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_r10 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_r10 (gfc_array_i16 * const restrict,
gfc_array_r10 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_r10);
diff --git a/libgfortran/generated/maxloc1_16_r16.c b/libgfortran/generated/maxloc1_16_r16.c
index b4330f487795..c3cb932721e2 100644
--- a/libgfortran/generated/maxloc1_16_r16.c
+++ b/libgfortran/generated/maxloc1_16_r16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_r16 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_r16 (gfc_array_i16 * const restrict,
gfc_array_r16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_r16);
diff --git a/libgfortran/generated/maxloc1_16_r17.c b/libgfortran/generated/maxloc1_16_r17.c
index 13720c38ff3a..971582537dbb 100644
--- a/libgfortran/generated/maxloc1_16_r17.c
+++ b/libgfortran/generated/maxloc1_16_r17.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_r17 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_r17 (gfc_array_i16 * const restrict,
gfc_array_r17 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_r17);
diff --git a/libgfortran/generated/maxloc1_16_r4.c b/libgfortran/generated/maxloc1_16_r4.c
index f2eeee4bdd1f..5e1e63bea5d2 100644
--- a/libgfortran/generated/maxloc1_16_r4.c
+++ b/libgfortran/generated/maxloc1_16_r4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_r4 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_r4 (gfc_array_i16 * const restrict,
gfc_array_r4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_r4);
diff --git a/libgfortran/generated/maxloc1_16_r8.c b/libgfortran/generated/maxloc1_16_r8.c
index 2454f0d7a262..dc9c9982d51e 100644
--- a/libgfortran/generated/maxloc1_16_r8.c
+++ b/libgfortran/generated/maxloc1_16_r8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_16_r8 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_r8 (gfc_array_i16 * const restrict,
gfc_array_r8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_16_r8);
diff --git a/libgfortran/generated/maxloc1_16_s1.c b/libgfortran/generated/maxloc1_16_s1.c
index 0deb10965f47..c9a9cf63b9ba 100644
--- a/libgfortran/generated/maxloc1_16_s1.c
+++ b/libgfortran/generated/maxloc1_16_s1.c
@@ -42,7 +42,7 @@ compare_fcn (const GFC_UINTEGER_1 *a, const GFC_UINTEGER_1 *b, gfc_charlen_type
return memcmp_char4 (a, b, n);
}
-extern void maxloc1_16_s1 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_s1 (gfc_array_i16 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type);
export_proto(maxloc1_16_s1);
@@ -207,7 +207,7 @@ maxloc1_16_s1 (gfc_array_i16 * const restrict retarray,
}
-extern void mmaxloc1_16_s1 (gfc_array_i16 * const restrict,
+extern void mmaxloc1_16_s1 (gfc_array_i16 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict,
gfc_array_l1 * const restrict, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(mmaxloc1_16_s1);
@@ -413,7 +413,7 @@ mmaxloc1_16_s1 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc1_16_s1 (gfc_array_i16 * const restrict,
+extern void smaxloc1_16_s1 (gfc_array_i16 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict,
GFC_LOGICAL_4 *, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(smaxloc1_16_s1);
diff --git a/libgfortran/generated/maxloc1_16_s4.c b/libgfortran/generated/maxloc1_16_s4.c
index 5f8cd832a757..5bb69e822538 100644
--- a/libgfortran/generated/maxloc1_16_s4.c
+++ b/libgfortran/generated/maxloc1_16_s4.c
@@ -42,7 +42,7 @@ compare_fcn (const GFC_UINTEGER_4 *a, const GFC_UINTEGER_4 *b, gfc_charlen_type
return memcmp_char4 (a, b, n);
}
-extern void maxloc1_16_s4 (gfc_array_i16 * const restrict,
+extern void maxloc1_16_s4 (gfc_array_i16 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type);
export_proto(maxloc1_16_s4);
@@ -207,7 +207,7 @@ maxloc1_16_s4 (gfc_array_i16 * const restrict retarray,
}
-extern void mmaxloc1_16_s4 (gfc_array_i16 * const restrict,
+extern void mmaxloc1_16_s4 (gfc_array_i16 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict,
gfc_array_l1 * const restrict, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(mmaxloc1_16_s4);
@@ -413,7 +413,7 @@ mmaxloc1_16_s4 (gfc_array_i16 * const restrict retarray,
}
-extern void smaxloc1_16_s4 (gfc_array_i16 * const restrict,
+extern void smaxloc1_16_s4 (gfc_array_i16 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict,
GFC_LOGICAL_4 *, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(smaxloc1_16_s4);
diff --git a/libgfortran/generated/maxloc1_4_i1.c b/libgfortran/generated/maxloc1_4_i1.c
index d75729552f2e..83bd0b5afebe 100644
--- a/libgfortran/generated/maxloc1_4_i1.c
+++ b/libgfortran/generated/maxloc1_4_i1.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_i1 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_i1 (gfc_array_i4 * const restrict,
gfc_array_i1 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_i1);
diff --git a/libgfortran/generated/maxloc1_4_i16.c b/libgfortran/generated/maxloc1_4_i16.c
index ad3ed6cfcafc..ed4e0e8b6fcd 100644
--- a/libgfortran/generated/maxloc1_4_i16.c
+++ b/libgfortran/generated/maxloc1_4_i16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_i16 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_i16 (gfc_array_i4 * const restrict,
gfc_array_i16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_i16);
diff --git a/libgfortran/generated/maxloc1_4_i2.c b/libgfortran/generated/maxloc1_4_i2.c
index bd18c0556a1b..a7db6cba3643 100644
--- a/libgfortran/generated/maxloc1_4_i2.c
+++ b/libgfortran/generated/maxloc1_4_i2.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_i2 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_i2 (gfc_array_i4 * const restrict,
gfc_array_i2 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_i2);
diff --git a/libgfortran/generated/maxloc1_4_i4.c b/libgfortran/generated/maxloc1_4_i4.c
index 5f623395981e..04d9af1a41ec 100644
--- a/libgfortran/generated/maxloc1_4_i4.c
+++ b/libgfortran/generated/maxloc1_4_i4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_i4 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_i4 (gfc_array_i4 * const restrict,
gfc_array_i4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_i4);
diff --git a/libgfortran/generated/maxloc1_4_i8.c b/libgfortran/generated/maxloc1_4_i8.c
index 5da449aa93ba..b3fcb830e3c8 100644
--- a/libgfortran/generated/maxloc1_4_i8.c
+++ b/libgfortran/generated/maxloc1_4_i8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_i8 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_i8 (gfc_array_i4 * const restrict,
gfc_array_i8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_i8);
diff --git a/libgfortran/generated/maxloc1_4_m1.c b/libgfortran/generated/maxloc1_4_m1.c
index 11dbc0e6aae6..30b7dcdc5357 100644
--- a/libgfortran/generated/maxloc1_4_m1.c
+++ b/libgfortran/generated/maxloc1_4_m1.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_m1 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_m1 (gfc_array_i4 * const restrict,
gfc_array_m1 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_m1);
diff --git a/libgfortran/generated/maxloc1_4_m16.c b/libgfortran/generated/maxloc1_4_m16.c
index 60c240d45997..bc817ba6cf09 100644
--- a/libgfortran/generated/maxloc1_4_m16.c
+++ b/libgfortran/generated/maxloc1_4_m16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_m16 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_m16 (gfc_array_i4 * const restrict,
gfc_array_m16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_m16);
diff --git a/libgfortran/generated/maxloc1_4_m2.c b/libgfortran/generated/maxloc1_4_m2.c
index 2d9aa300a723..c736717d382f 100644
--- a/libgfortran/generated/maxloc1_4_m2.c
+++ b/libgfortran/generated/maxloc1_4_m2.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_m2 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_m2 (gfc_array_i4 * const restrict,
gfc_array_m2 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_m2);
diff --git a/libgfortran/generated/maxloc1_4_m4.c b/libgfortran/generated/maxloc1_4_m4.c
index f885535f1aa8..d0c28532f2cd 100644
--- a/libgfortran/generated/maxloc1_4_m4.c
+++ b/libgfortran/generated/maxloc1_4_m4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_m4 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_m4 (gfc_array_i4 * const restrict,
gfc_array_m4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_m4);
diff --git a/libgfortran/generated/maxloc1_4_m8.c b/libgfortran/generated/maxloc1_4_m8.c
index 4493f46d11d9..caedc865fef5 100644
--- a/libgfortran/generated/maxloc1_4_m8.c
+++ b/libgfortran/generated/maxloc1_4_m8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_m8 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_m8 (gfc_array_i4 * const restrict,
gfc_array_m8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_m8);
diff --git a/libgfortran/generated/maxloc1_4_r10.c b/libgfortran/generated/maxloc1_4_r10.c
index 7099bdb23dd1..f25d73e67a5e 100644
--- a/libgfortran/generated/maxloc1_4_r10.c
+++ b/libgfortran/generated/maxloc1_4_r10.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_r10 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_r10 (gfc_array_i4 * const restrict,
gfc_array_r10 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_r10);
diff --git a/libgfortran/generated/maxloc1_4_r16.c b/libgfortran/generated/maxloc1_4_r16.c
index 44ce31bdab51..77dffc75a435 100644
--- a/libgfortran/generated/maxloc1_4_r16.c
+++ b/libgfortran/generated/maxloc1_4_r16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_r16 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_r16 (gfc_array_i4 * const restrict,
gfc_array_r16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_r16);
diff --git a/libgfortran/generated/maxloc1_4_r17.c b/libgfortran/generated/maxloc1_4_r17.c
index 8effbf554eb4..e300ffdf36b3 100644
--- a/libgfortran/generated/maxloc1_4_r17.c
+++ b/libgfortran/generated/maxloc1_4_r17.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_r17 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_r17 (gfc_array_i4 * const restrict,
gfc_array_r17 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_r17);
diff --git a/libgfortran/generated/maxloc1_4_r4.c b/libgfortran/generated/maxloc1_4_r4.c
index 43d197337d9f..19bd8c07d8e1 100644
--- a/libgfortran/generated/maxloc1_4_r4.c
+++ b/libgfortran/generated/maxloc1_4_r4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_r4 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_r4 (gfc_array_i4 * const restrict,
gfc_array_r4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_r4);
diff --git a/libgfortran/generated/maxloc1_4_r8.c b/libgfortran/generated/maxloc1_4_r8.c
index a5539e899584..37f27b5713cf 100644
--- a/libgfortran/generated/maxloc1_4_r8.c
+++ b/libgfortran/generated/maxloc1_4_r8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_4_r8 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_r8 (gfc_array_i4 * const restrict,
gfc_array_r8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_4_r8);
diff --git a/libgfortran/generated/maxloc1_4_s1.c b/libgfortran/generated/maxloc1_4_s1.c
index b16f0692cd9f..877579988fe5 100644
--- a/libgfortran/generated/maxloc1_4_s1.c
+++ b/libgfortran/generated/maxloc1_4_s1.c
@@ -42,7 +42,7 @@ compare_fcn (const GFC_UINTEGER_1 *a, const GFC_UINTEGER_1 *b, gfc_charlen_type
return memcmp_char4 (a, b, n);
}
-extern void maxloc1_4_s1 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_s1 (gfc_array_i4 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type);
export_proto(maxloc1_4_s1);
@@ -207,7 +207,7 @@ maxloc1_4_s1 (gfc_array_i4 * const restrict retarray,
}
-extern void mmaxloc1_4_s1 (gfc_array_i4 * const restrict,
+extern void mmaxloc1_4_s1 (gfc_array_i4 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict,
gfc_array_l1 * const restrict, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(mmaxloc1_4_s1);
@@ -413,7 +413,7 @@ mmaxloc1_4_s1 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc1_4_s1 (gfc_array_i4 * const restrict,
+extern void smaxloc1_4_s1 (gfc_array_i4 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict,
GFC_LOGICAL_4 *, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(smaxloc1_4_s1);
diff --git a/libgfortran/generated/maxloc1_4_s4.c b/libgfortran/generated/maxloc1_4_s4.c
index 42fcc1b2c24d..ac8284151645 100644
--- a/libgfortran/generated/maxloc1_4_s4.c
+++ b/libgfortran/generated/maxloc1_4_s4.c
@@ -42,7 +42,7 @@ compare_fcn (const GFC_UINTEGER_4 *a, const GFC_UINTEGER_4 *b, gfc_charlen_type
return memcmp_char4 (a, b, n);
}
-extern void maxloc1_4_s4 (gfc_array_i4 * const restrict,
+extern void maxloc1_4_s4 (gfc_array_i4 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type);
export_proto(maxloc1_4_s4);
@@ -207,7 +207,7 @@ maxloc1_4_s4 (gfc_array_i4 * const restrict retarray,
}
-extern void mmaxloc1_4_s4 (gfc_array_i4 * const restrict,
+extern void mmaxloc1_4_s4 (gfc_array_i4 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict,
gfc_array_l1 * const restrict, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(mmaxloc1_4_s4);
@@ -413,7 +413,7 @@ mmaxloc1_4_s4 (gfc_array_i4 * const restrict retarray,
}
-extern void smaxloc1_4_s4 (gfc_array_i4 * const restrict,
+extern void smaxloc1_4_s4 (gfc_array_i4 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict,
GFC_LOGICAL_4 *, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(smaxloc1_4_s4);
diff --git a/libgfortran/generated/maxloc1_8_i1.c b/libgfortran/generated/maxloc1_8_i1.c
index 000117b60a20..8974664b1a4c 100644
--- a/libgfortran/generated/maxloc1_8_i1.c
+++ b/libgfortran/generated/maxloc1_8_i1.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_i1 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_i1 (gfc_array_i8 * const restrict,
gfc_array_i1 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_i1);
diff --git a/libgfortran/generated/maxloc1_8_i16.c b/libgfortran/generated/maxloc1_8_i16.c
index 694b44fff1ad..689d71eb6786 100644
--- a/libgfortran/generated/maxloc1_8_i16.c
+++ b/libgfortran/generated/maxloc1_8_i16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_i16 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_i16 (gfc_array_i8 * const restrict,
gfc_array_i16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_i16);
diff --git a/libgfortran/generated/maxloc1_8_i2.c b/libgfortran/generated/maxloc1_8_i2.c
index 46181371c92c..f4c2ced05e3f 100644
--- a/libgfortran/generated/maxloc1_8_i2.c
+++ b/libgfortran/generated/maxloc1_8_i2.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_i2 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_i2 (gfc_array_i8 * const restrict,
gfc_array_i2 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_i2);
diff --git a/libgfortran/generated/maxloc1_8_i4.c b/libgfortran/generated/maxloc1_8_i4.c
index 0fe5e55a159c..551db2a19cb3 100644
--- a/libgfortran/generated/maxloc1_8_i4.c
+++ b/libgfortran/generated/maxloc1_8_i4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_i4 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_i4 (gfc_array_i8 * const restrict,
gfc_array_i4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_i4);
diff --git a/libgfortran/generated/maxloc1_8_i8.c b/libgfortran/generated/maxloc1_8_i8.c
index 14307f865d71..978f43f3092a 100644
--- a/libgfortran/generated/maxloc1_8_i8.c
+++ b/libgfortran/generated/maxloc1_8_i8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_i8 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_i8 (gfc_array_i8 * const restrict,
gfc_array_i8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_i8);
diff --git a/libgfortran/generated/maxloc1_8_m1.c b/libgfortran/generated/maxloc1_8_m1.c
index b655809ad1f7..57d8e2fa4898 100644
--- a/libgfortran/generated/maxloc1_8_m1.c
+++ b/libgfortran/generated/maxloc1_8_m1.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_m1 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_m1 (gfc_array_i8 * const restrict,
gfc_array_m1 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_m1);
diff --git a/libgfortran/generated/maxloc1_8_m16.c b/libgfortran/generated/maxloc1_8_m16.c
index 45ce56858483..ea7b1dfc3919 100644
--- a/libgfortran/generated/maxloc1_8_m16.c
+++ b/libgfortran/generated/maxloc1_8_m16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_m16 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_m16 (gfc_array_i8 * const restrict,
gfc_array_m16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_m16);
diff --git a/libgfortran/generated/maxloc1_8_m2.c b/libgfortran/generated/maxloc1_8_m2.c
index 22d59ede4d3a..5f7e6511b495 100644
--- a/libgfortran/generated/maxloc1_8_m2.c
+++ b/libgfortran/generated/maxloc1_8_m2.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_m2 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_m2 (gfc_array_i8 * const restrict,
gfc_array_m2 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_m2);
diff --git a/libgfortran/generated/maxloc1_8_m4.c b/libgfortran/generated/maxloc1_8_m4.c
index 9bd8204a73c5..6e47521c5beb 100644
--- a/libgfortran/generated/maxloc1_8_m4.c
+++ b/libgfortran/generated/maxloc1_8_m4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_m4 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_m4 (gfc_array_i8 * const restrict,
gfc_array_m4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_m4);
diff --git a/libgfortran/generated/maxloc1_8_m8.c b/libgfortran/generated/maxloc1_8_m8.c
index c410839b99b8..ac489b77f251 100644
--- a/libgfortran/generated/maxloc1_8_m8.c
+++ b/libgfortran/generated/maxloc1_8_m8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_m8 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_m8 (gfc_array_i8 * const restrict,
gfc_array_m8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_m8);
diff --git a/libgfortran/generated/maxloc1_8_r10.c b/libgfortran/generated/maxloc1_8_r10.c
index 3eb1024c6337..d08120ae7ed2 100644
--- a/libgfortran/generated/maxloc1_8_r10.c
+++ b/libgfortran/generated/maxloc1_8_r10.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_r10 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_r10 (gfc_array_i8 * const restrict,
gfc_array_r10 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_r10);
diff --git a/libgfortran/generated/maxloc1_8_r16.c b/libgfortran/generated/maxloc1_8_r16.c
index 4535e954f610..37fba0ec1bf5 100644
--- a/libgfortran/generated/maxloc1_8_r16.c
+++ b/libgfortran/generated/maxloc1_8_r16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_r16 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_r16 (gfc_array_i8 * const restrict,
gfc_array_r16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_r16);
diff --git a/libgfortran/generated/maxloc1_8_r17.c b/libgfortran/generated/maxloc1_8_r17.c
index 21ecb956b14f..377824a4c32a 100644
--- a/libgfortran/generated/maxloc1_8_r17.c
+++ b/libgfortran/generated/maxloc1_8_r17.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_r17 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_r17 (gfc_array_i8 * const restrict,
gfc_array_r17 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_r17);
diff --git a/libgfortran/generated/maxloc1_8_r4.c b/libgfortran/generated/maxloc1_8_r4.c
index a1298a4775c5..aa58591fcab2 100644
--- a/libgfortran/generated/maxloc1_8_r4.c
+++ b/libgfortran/generated/maxloc1_8_r4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_r4 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_r4 (gfc_array_i8 * const restrict,
gfc_array_r4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_r4);
diff --git a/libgfortran/generated/maxloc1_8_r8.c b/libgfortran/generated/maxloc1_8_r8.c
index 8bbeda6e3160..fe3fb117a14a 100644
--- a/libgfortran/generated/maxloc1_8_r8.c
+++ b/libgfortran/generated/maxloc1_8_r8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void maxloc1_8_r8 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_r8 (gfc_array_i8 * const restrict,
gfc_array_r8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(maxloc1_8_r8);
diff --git a/libgfortran/generated/maxloc1_8_s1.c b/libgfortran/generated/maxloc1_8_s1.c
index 7a0c2e03b82f..16f316e0b215 100644
--- a/libgfortran/generated/maxloc1_8_s1.c
+++ b/libgfortran/generated/maxloc1_8_s1.c
@@ -42,7 +42,7 @@ compare_fcn (const GFC_UINTEGER_1 *a, const GFC_UINTEGER_1 *b, gfc_charlen_type
return memcmp_char4 (a, b, n);
}
-extern void maxloc1_8_s1 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_s1 (gfc_array_i8 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type);
export_proto(maxloc1_8_s1);
@@ -207,7 +207,7 @@ maxloc1_8_s1 (gfc_array_i8 * const restrict retarray,
}
-extern void mmaxloc1_8_s1 (gfc_array_i8 * const restrict,
+extern void mmaxloc1_8_s1 (gfc_array_i8 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict,
gfc_array_l1 * const restrict, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(mmaxloc1_8_s1);
@@ -413,7 +413,7 @@ mmaxloc1_8_s1 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc1_8_s1 (gfc_array_i8 * const restrict,
+extern void smaxloc1_8_s1 (gfc_array_i8 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict,
GFC_LOGICAL_4 *, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(smaxloc1_8_s1);
diff --git a/libgfortran/generated/maxloc1_8_s4.c b/libgfortran/generated/maxloc1_8_s4.c
index 43c66a2ca78f..ffbbd4279761 100644
--- a/libgfortran/generated/maxloc1_8_s4.c
+++ b/libgfortran/generated/maxloc1_8_s4.c
@@ -42,7 +42,7 @@ compare_fcn (const GFC_UINTEGER_4 *a, const GFC_UINTEGER_4 *b, gfc_charlen_type
return memcmp_char4 (a, b, n);
}
-extern void maxloc1_8_s4 (gfc_array_i8 * const restrict,
+extern void maxloc1_8_s4 (gfc_array_i8 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type);
export_proto(maxloc1_8_s4);
@@ -207,7 +207,7 @@ maxloc1_8_s4 (gfc_array_i8 * const restrict retarray,
}
-extern void mmaxloc1_8_s4 (gfc_array_i8 * const restrict,
+extern void mmaxloc1_8_s4 (gfc_array_i8 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict,
gfc_array_l1 * const restrict, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(mmaxloc1_8_s4);
@@ -413,7 +413,7 @@ mmaxloc1_8_s4 (gfc_array_i8 * const restrict retarray,
}
-extern void smaxloc1_8_s4 (gfc_array_i8 * const restrict,
+extern void smaxloc1_8_s4 (gfc_array_i8 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict,
GFC_LOGICAL_4 *, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(smaxloc1_8_s4);
diff --git a/libgfortran/generated/maxval1_s1.c b/libgfortran/generated/maxval1_s1.c
index 33a0f6cede4d..ef5408339c7a 100644
--- a/libgfortran/generated/maxval1_s1.c
+++ b/libgfortran/generated/maxval1_s1.c
@@ -46,8 +46,8 @@ extern void maxval1_s1 (gfc_array_s1 * const restrict,
export_proto(maxval1_s1);
void
-maxval1_s1 (gfc_array_s1 * const restrict retarray,
- gfc_charlen_type xlen, gfc_array_s1 * const restrict array,
+maxval1_s1 (gfc_array_s1 * const restrict retarray,
+ gfc_charlen_type xlen, gfc_array_s1 * const restrict array,
const index_type * const restrict pdim, gfc_charlen_type string_len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -210,8 +210,8 @@ extern void mmaxval1_s1 (gfc_array_s1 * const restrict,
export_proto(mmaxval1_s1);
void
-mmaxval1_s1 (gfc_array_s1 * const restrict retarray,
- gfc_charlen_type xlen, gfc_array_s1 * const restrict array,
+mmaxval1_s1 (gfc_array_s1 * const restrict retarray,
+ gfc_charlen_type xlen, gfc_array_s1 * const restrict array,
const index_type * const restrict pdim,
gfc_array_l1 * const restrict mask,
gfc_charlen_type string_len)
@@ -414,8 +414,8 @@ void smaxval1_s1 (gfc_array_s1 * const restrict,
export_proto(smaxval1_s1);
void
-smaxval1_s1 (gfc_array_s1 * const restrict retarray,
- gfc_charlen_type xlen, gfc_array_s1 * const restrict array,
+smaxval1_s1 (gfc_array_s1 * const restrict retarray,
+ gfc_charlen_type xlen, gfc_array_s1 * const restrict array,
const index_type * const restrict pdim,
GFC_LOGICAL_4 *mask, gfc_charlen_type string_len)
diff --git a/libgfortran/generated/maxval1_s4.c b/libgfortran/generated/maxval1_s4.c
index 37df4c0b5a64..53fe5917826e 100644
--- a/libgfortran/generated/maxval1_s4.c
+++ b/libgfortran/generated/maxval1_s4.c
@@ -46,8 +46,8 @@ extern void maxval1_s4 (gfc_array_s4 * const restrict,
export_proto(maxval1_s4);
void
-maxval1_s4 (gfc_array_s4 * const restrict retarray,
- gfc_charlen_type xlen, gfc_array_s4 * const restrict array,
+maxval1_s4 (gfc_array_s4 * const restrict retarray,
+ gfc_charlen_type xlen, gfc_array_s4 * const restrict array,
const index_type * const restrict pdim, gfc_charlen_type string_len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -210,8 +210,8 @@ extern void mmaxval1_s4 (gfc_array_s4 * const restrict,
export_proto(mmaxval1_s4);
void
-mmaxval1_s4 (gfc_array_s4 * const restrict retarray,
- gfc_charlen_type xlen, gfc_array_s4 * const restrict array,
+mmaxval1_s4 (gfc_array_s4 * const restrict retarray,
+ gfc_charlen_type xlen, gfc_array_s4 * const restrict array,
const index_type * const restrict pdim,
gfc_array_l1 * const restrict mask,
gfc_charlen_type string_len)
@@ -414,8 +414,8 @@ void smaxval1_s4 (gfc_array_s4 * const restrict,
export_proto(smaxval1_s4);
void
-smaxval1_s4 (gfc_array_s4 * const restrict retarray,
- gfc_charlen_type xlen, gfc_array_s4 * const restrict array,
+smaxval1_s4 (gfc_array_s4 * const restrict retarray,
+ gfc_charlen_type xlen, gfc_array_s4 * const restrict array,
const index_type * const restrict pdim,
GFC_LOGICAL_4 *mask, gfc_charlen_type string_len)
diff --git a/libgfortran/generated/maxval_i1.c b/libgfortran/generated/maxval_i1.c
index fbc2a7394a0f..ae89e20b9384 100644
--- a/libgfortran/generated/maxval_i1.c
+++ b/libgfortran/generated/maxval_i1.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_1) && defined (HAVE_GFC_INTEGER_1)
-extern void maxval_i1 (gfc_array_i1 * const restrict,
+extern void maxval_i1 (gfc_array_i1 * const restrict,
gfc_array_i1 * const restrict, const index_type * const restrict);
export_proto(maxval_i1);
diff --git a/libgfortran/generated/maxval_i16.c b/libgfortran/generated/maxval_i16.c
index bce4dc5144c7..c07cfd346cc2 100644
--- a/libgfortran/generated/maxval_i16.c
+++ b/libgfortran/generated/maxval_i16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_16) && defined (HAVE_GFC_INTEGER_16)
-extern void maxval_i16 (gfc_array_i16 * const restrict,
+extern void maxval_i16 (gfc_array_i16 * const restrict,
gfc_array_i16 * const restrict, const index_type * const restrict);
export_proto(maxval_i16);
diff --git a/libgfortran/generated/maxval_i2.c b/libgfortran/generated/maxval_i2.c
index fc14a3399b6b..07ed210a4532 100644
--- a/libgfortran/generated/maxval_i2.c
+++ b/libgfortran/generated/maxval_i2.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_2) && defined (HAVE_GFC_INTEGER_2)
-extern void maxval_i2 (gfc_array_i2 * const restrict,
+extern void maxval_i2 (gfc_array_i2 * const restrict,
gfc_array_i2 * const restrict, const index_type * const restrict);
export_proto(maxval_i2);
diff --git a/libgfortran/generated/maxval_i4.c b/libgfortran/generated/maxval_i4.c
index d172f4e6c1f8..cf2609460739 100644
--- a/libgfortran/generated/maxval_i4.c
+++ b/libgfortran/generated/maxval_i4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_4) && defined (HAVE_GFC_INTEGER_4)
-extern void maxval_i4 (gfc_array_i4 * const restrict,
+extern void maxval_i4 (gfc_array_i4 * const restrict,
gfc_array_i4 * const restrict, const index_type * const restrict);
export_proto(maxval_i4);
diff --git a/libgfortran/generated/maxval_i8.c b/libgfortran/generated/maxval_i8.c
index 2e9e5c16addd..7df457eee81c 100644
--- a/libgfortran/generated/maxval_i8.c
+++ b/libgfortran/generated/maxval_i8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_8) && defined (HAVE_GFC_INTEGER_8)
-extern void maxval_i8 (gfc_array_i8 * const restrict,
+extern void maxval_i8 (gfc_array_i8 * const restrict,
gfc_array_i8 * const restrict, const index_type * const restrict);
export_proto(maxval_i8);
diff --git a/libgfortran/generated/maxval_m1.c b/libgfortran/generated/maxval_m1.c
index a1f18451a7ce..bc8d442e165c 100644
--- a/libgfortran/generated/maxval_m1.c
+++ b/libgfortran/generated/maxval_m1.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_1) && defined (HAVE_GFC_UINTEGER_1)
-extern void maxval_m1 (gfc_array_m1 * const restrict,
+extern void maxval_m1 (gfc_array_m1 * const restrict,
gfc_array_m1 * const restrict, const index_type * const restrict);
export_proto(maxval_m1);
diff --git a/libgfortran/generated/maxval_m16.c b/libgfortran/generated/maxval_m16.c
index 15bac491fe30..07f1ed0bfecf 100644
--- a/libgfortran/generated/maxval_m16.c
+++ b/libgfortran/generated/maxval_m16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_16) && defined (HAVE_GFC_UINTEGER_16)
-extern void maxval_m16 (gfc_array_m16 * const restrict,
+extern void maxval_m16 (gfc_array_m16 * const restrict,
gfc_array_m16 * const restrict, const index_type * const restrict);
export_proto(maxval_m16);
diff --git a/libgfortran/generated/maxval_m2.c b/libgfortran/generated/maxval_m2.c
index 87c9c9106e9b..3f100ab876d6 100644
--- a/libgfortran/generated/maxval_m2.c
+++ b/libgfortran/generated/maxval_m2.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_2) && defined (HAVE_GFC_UINTEGER_2)
-extern void maxval_m2 (gfc_array_m2 * const restrict,
+extern void maxval_m2 (gfc_array_m2 * const restrict,
gfc_array_m2 * const restrict, const index_type * const restrict);
export_proto(maxval_m2);
diff --git a/libgfortran/generated/maxval_m4.c b/libgfortran/generated/maxval_m4.c
index f276d4555097..fccb76577d1f 100644
--- a/libgfortran/generated/maxval_m4.c
+++ b/libgfortran/generated/maxval_m4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_4) && defined (HAVE_GFC_UINTEGER_4)
-extern void maxval_m4 (gfc_array_m4 * const restrict,
+extern void maxval_m4 (gfc_array_m4 * const restrict,
gfc_array_m4 * const restrict, const index_type * const restrict);
export_proto(maxval_m4);
diff --git a/libgfortran/generated/maxval_m8.c b/libgfortran/generated/maxval_m8.c
index 0e85262a24d6..264037a4ca41 100644
--- a/libgfortran/generated/maxval_m8.c
+++ b/libgfortran/generated/maxval_m8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_8) && defined (HAVE_GFC_UINTEGER_8)
-extern void maxval_m8 (gfc_array_m8 * const restrict,
+extern void maxval_m8 (gfc_array_m8 * const restrict,
gfc_array_m8 * const restrict, const index_type * const restrict);
export_proto(maxval_m8);
diff --git a/libgfortran/generated/maxval_r10.c b/libgfortran/generated/maxval_r10.c
index d240c0cbcc06..e13c0dd2764e 100644
--- a/libgfortran/generated/maxval_r10.c
+++ b/libgfortran/generated/maxval_r10.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_10) && defined (HAVE_GFC_REAL_10)
-extern void maxval_r10 (gfc_array_r10 * const restrict,
+extern void maxval_r10 (gfc_array_r10 * const restrict,
gfc_array_r10 * const restrict, const index_type * const restrict);
export_proto(maxval_r10);
diff --git a/libgfortran/generated/maxval_r16.c b/libgfortran/generated/maxval_r16.c
index 73c9a6433cce..6277ef5c0a0b 100644
--- a/libgfortran/generated/maxval_r16.c
+++ b/libgfortran/generated/maxval_r16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_16) && defined (HAVE_GFC_REAL_16)
-extern void maxval_r16 (gfc_array_r16 * const restrict,
+extern void maxval_r16 (gfc_array_r16 * const restrict,
gfc_array_r16 * const restrict, const index_type * const restrict);
export_proto(maxval_r16);
diff --git a/libgfortran/generated/maxval_r17.c b/libgfortran/generated/maxval_r17.c
index 1ab8c1a0480f..a4293b92e5c2 100644
--- a/libgfortran/generated/maxval_r17.c
+++ b/libgfortran/generated/maxval_r17.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_17) && defined (HAVE_GFC_REAL_17)
-extern void maxval_r17 (gfc_array_r17 * const restrict,
+extern void maxval_r17 (gfc_array_r17 * const restrict,
gfc_array_r17 * const restrict, const index_type * const restrict);
export_proto(maxval_r17);
diff --git a/libgfortran/generated/maxval_r4.c b/libgfortran/generated/maxval_r4.c
index 1d0bf7ed13b0..8a241203b869 100644
--- a/libgfortran/generated/maxval_r4.c
+++ b/libgfortran/generated/maxval_r4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_4) && defined (HAVE_GFC_REAL_4)
-extern void maxval_r4 (gfc_array_r4 * const restrict,
+extern void maxval_r4 (gfc_array_r4 * const restrict,
gfc_array_r4 * const restrict, const index_type * const restrict);
export_proto(maxval_r4);
diff --git a/libgfortran/generated/maxval_r8.c b/libgfortran/generated/maxval_r8.c
index 223909ca04ac..0c7da12852ac 100644
--- a/libgfortran/generated/maxval_r8.c
+++ b/libgfortran/generated/maxval_r8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_8) && defined (HAVE_GFC_REAL_8)
-extern void maxval_r8 (gfc_array_r8 * const restrict,
+extern void maxval_r8 (gfc_array_r8 * const restrict,
gfc_array_r8 * const restrict, const index_type * const restrict);
export_proto(maxval_r8);
diff --git a/libgfortran/generated/minloc0_16_i1.c b/libgfortran/generated/minloc0_16_i1.c
index c98e1f254bbe..8533d9810c5f 100644
--- a/libgfortran/generated/minloc0_16_i1.c
+++ b/libgfortran/generated/minloc0_16_i1.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_1) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_i1 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_i1 (gfc_array_i16 * const restrict retarray,
gfc_array_i1 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_i1);
void
-minloc0_16_i1 (gfc_array_i16 * const restrict retarray,
+minloc0_16_i1 (gfc_array_i16 * const restrict retarray,
gfc_array_i1 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_i1 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_i1 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_i1 (gfc_array_i16 * const restrict,
gfc_array_i1 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_i1);
void
-mminloc0_16_i1 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_i1 (gfc_array_i16 * const restrict retarray,
gfc_array_i1 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_i1 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_i1 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_i1 (gfc_array_i16 * const restrict,
gfc_array_i1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_i1);
void
-sminloc0_16_i1 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_i1 (gfc_array_i16 * const restrict retarray,
gfc_array_i1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_i16.c b/libgfortran/generated/minloc0_16_i16.c
index bb98641266ed..f6361e53b13b 100644
--- a/libgfortran/generated/minloc0_16_i16.c
+++ b/libgfortran/generated/minloc0_16_i16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_16) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_i16 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_i16 (gfc_array_i16 * const restrict retarray,
gfc_array_i16 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_i16);
void
-minloc0_16_i16 (gfc_array_i16 * const restrict retarray,
+minloc0_16_i16 (gfc_array_i16 * const restrict retarray,
gfc_array_i16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_i16 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_i16 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_i16 (gfc_array_i16 * const restrict,
gfc_array_i16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_i16);
void
-mminloc0_16_i16 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_i16 (gfc_array_i16 * const restrict retarray,
gfc_array_i16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_i16 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_i16 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_i16 (gfc_array_i16 * const restrict,
gfc_array_i16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_i16);
void
-sminloc0_16_i16 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_i16 (gfc_array_i16 * const restrict retarray,
gfc_array_i16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_i2.c b/libgfortran/generated/minloc0_16_i2.c
index 935c8368deb6..401e5c9bba4c 100644
--- a/libgfortran/generated/minloc0_16_i2.c
+++ b/libgfortran/generated/minloc0_16_i2.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_2) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_i2 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_i2 (gfc_array_i16 * const restrict retarray,
gfc_array_i2 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_i2);
void
-minloc0_16_i2 (gfc_array_i16 * const restrict retarray,
+minloc0_16_i2 (gfc_array_i16 * const restrict retarray,
gfc_array_i2 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_i2 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_i2 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_i2 (gfc_array_i16 * const restrict,
gfc_array_i2 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_i2);
void
-mminloc0_16_i2 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_i2 (gfc_array_i16 * const restrict retarray,
gfc_array_i2 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_i2 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_i2 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_i2 (gfc_array_i16 * const restrict,
gfc_array_i2 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_i2);
void
-sminloc0_16_i2 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_i2 (gfc_array_i16 * const restrict retarray,
gfc_array_i2 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_i4.c b/libgfortran/generated/minloc0_16_i4.c
index a9f62cba0e91..e3f8e2653017 100644
--- a/libgfortran/generated/minloc0_16_i4.c
+++ b/libgfortran/generated/minloc0_16_i4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_4) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_i4 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_i4 (gfc_array_i16 * const restrict retarray,
gfc_array_i4 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_i4);
void
-minloc0_16_i4 (gfc_array_i16 * const restrict retarray,
+minloc0_16_i4 (gfc_array_i16 * const restrict retarray,
gfc_array_i4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_i4 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_i4 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_i4 (gfc_array_i16 * const restrict,
gfc_array_i4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_i4);
void
-mminloc0_16_i4 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_i4 (gfc_array_i16 * const restrict retarray,
gfc_array_i4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_i4 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_i4 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_i4 (gfc_array_i16 * const restrict,
gfc_array_i4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_i4);
void
-sminloc0_16_i4 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_i4 (gfc_array_i16 * const restrict retarray,
gfc_array_i4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_i8.c b/libgfortran/generated/minloc0_16_i8.c
index e759380c9e77..1f2d91e98550 100644
--- a/libgfortran/generated/minloc0_16_i8.c
+++ b/libgfortran/generated/minloc0_16_i8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_8) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_i8 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_i8 (gfc_array_i16 * const restrict retarray,
gfc_array_i8 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_i8);
void
-minloc0_16_i8 (gfc_array_i16 * const restrict retarray,
+minloc0_16_i8 (gfc_array_i16 * const restrict retarray,
gfc_array_i8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_i8 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_i8 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_i8 (gfc_array_i16 * const restrict,
gfc_array_i8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_i8);
void
-mminloc0_16_i8 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_i8 (gfc_array_i16 * const restrict retarray,
gfc_array_i8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_i8 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_i8 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_i8 (gfc_array_i16 * const restrict,
gfc_array_i8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_i8);
void
-sminloc0_16_i8 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_i8 (gfc_array_i16 * const restrict retarray,
gfc_array_i8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_m1.c b/libgfortran/generated/minloc0_16_m1.c
index ab9c39b77504..76fd4762dffd 100644
--- a/libgfortran/generated/minloc0_16_m1.c
+++ b/libgfortran/generated/minloc0_16_m1.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_1) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_m1 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_m1 (gfc_array_i16 * const restrict retarray,
gfc_array_m1 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_m1);
void
-minloc0_16_m1 (gfc_array_i16 * const restrict retarray,
+minloc0_16_m1 (gfc_array_i16 * const restrict retarray,
gfc_array_m1 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_m1 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_m1 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_m1 (gfc_array_i16 * const restrict,
gfc_array_m1 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_m1);
void
-mminloc0_16_m1 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_m1 (gfc_array_i16 * const restrict retarray,
gfc_array_m1 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_m1 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_m1 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_m1 (gfc_array_i16 * const restrict,
gfc_array_m1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_m1);
void
-sminloc0_16_m1 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_m1 (gfc_array_i16 * const restrict retarray,
gfc_array_m1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_m16.c b/libgfortran/generated/minloc0_16_m16.c
index 5c03f9672aaa..8437afddffee 100644
--- a/libgfortran/generated/minloc0_16_m16.c
+++ b/libgfortran/generated/minloc0_16_m16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_16) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_m16 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_m16 (gfc_array_i16 * const restrict retarray,
gfc_array_m16 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_m16);
void
-minloc0_16_m16 (gfc_array_i16 * const restrict retarray,
+minloc0_16_m16 (gfc_array_i16 * const restrict retarray,
gfc_array_m16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_m16 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_m16 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_m16 (gfc_array_i16 * const restrict,
gfc_array_m16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_m16);
void
-mminloc0_16_m16 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_m16 (gfc_array_i16 * const restrict retarray,
gfc_array_m16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_m16 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_m16 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_m16 (gfc_array_i16 * const restrict,
gfc_array_m16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_m16);
void
-sminloc0_16_m16 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_m16 (gfc_array_i16 * const restrict retarray,
gfc_array_m16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_m2.c b/libgfortran/generated/minloc0_16_m2.c
index d1132ef2cefd..f43144894976 100644
--- a/libgfortran/generated/minloc0_16_m2.c
+++ b/libgfortran/generated/minloc0_16_m2.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_2) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_m2 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_m2 (gfc_array_i16 * const restrict retarray,
gfc_array_m2 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_m2);
void
-minloc0_16_m2 (gfc_array_i16 * const restrict retarray,
+minloc0_16_m2 (gfc_array_i16 * const restrict retarray,
gfc_array_m2 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_m2 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_m2 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_m2 (gfc_array_i16 * const restrict,
gfc_array_m2 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_m2);
void
-mminloc0_16_m2 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_m2 (gfc_array_i16 * const restrict retarray,
gfc_array_m2 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_m2 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_m2 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_m2 (gfc_array_i16 * const restrict,
gfc_array_m2 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_m2);
void
-sminloc0_16_m2 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_m2 (gfc_array_i16 * const restrict retarray,
gfc_array_m2 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_m4.c b/libgfortran/generated/minloc0_16_m4.c
index c78a4c7409f0..e7d3560e5dbe 100644
--- a/libgfortran/generated/minloc0_16_m4.c
+++ b/libgfortran/generated/minloc0_16_m4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_4) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_m4 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_m4 (gfc_array_i16 * const restrict retarray,
gfc_array_m4 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_m4);
void
-minloc0_16_m4 (gfc_array_i16 * const restrict retarray,
+minloc0_16_m4 (gfc_array_i16 * const restrict retarray,
gfc_array_m4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_m4 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_m4 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_m4 (gfc_array_i16 * const restrict,
gfc_array_m4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_m4);
void
-mminloc0_16_m4 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_m4 (gfc_array_i16 * const restrict retarray,
gfc_array_m4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_m4 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_m4 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_m4 (gfc_array_i16 * const restrict,
gfc_array_m4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_m4);
void
-sminloc0_16_m4 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_m4 (gfc_array_i16 * const restrict retarray,
gfc_array_m4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_m8.c b/libgfortran/generated/minloc0_16_m8.c
index 32c7acc02fe1..6c7eb91aec99 100644
--- a/libgfortran/generated/minloc0_16_m8.c
+++ b/libgfortran/generated/minloc0_16_m8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_8) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_m8 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_m8 (gfc_array_i16 * const restrict retarray,
gfc_array_m8 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_m8);
void
-minloc0_16_m8 (gfc_array_i16 * const restrict retarray,
+minloc0_16_m8 (gfc_array_i16 * const restrict retarray,
gfc_array_m8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_m8 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_m8 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_m8 (gfc_array_i16 * const restrict,
gfc_array_m8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_m8);
void
-mminloc0_16_m8 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_m8 (gfc_array_i16 * const restrict retarray,
gfc_array_m8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_m8 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_m8 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_m8 (gfc_array_i16 * const restrict,
gfc_array_m8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_m8);
void
-sminloc0_16_m8 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_m8 (gfc_array_i16 * const restrict retarray,
gfc_array_m8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_r10.c b/libgfortran/generated/minloc0_16_r10.c
index 3f2bda6c3189..822d67678c64 100644
--- a/libgfortran/generated/minloc0_16_r10.c
+++ b/libgfortran/generated/minloc0_16_r10.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_10) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_r10 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_r10 (gfc_array_i16 * const restrict retarray,
gfc_array_r10 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_r10);
void
-minloc0_16_r10 (gfc_array_i16 * const restrict retarray,
+minloc0_16_r10 (gfc_array_i16 * const restrict retarray,
gfc_array_r10 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_r10 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_r10 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_r10 (gfc_array_i16 * const restrict,
gfc_array_r10 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_r10);
void
-mminloc0_16_r10 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_r10 (gfc_array_i16 * const restrict retarray,
gfc_array_r10 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_r10 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_r10 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_r10 (gfc_array_i16 * const restrict,
gfc_array_r10 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_r10);
void
-sminloc0_16_r10 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_r10 (gfc_array_i16 * const restrict retarray,
gfc_array_r10 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_r16.c b/libgfortran/generated/minloc0_16_r16.c
index aa56b1679db1..7f6cdf54d487 100644
--- a/libgfortran/generated/minloc0_16_r16.c
+++ b/libgfortran/generated/minloc0_16_r16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_16) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_r16 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_r16 (gfc_array_i16 * const restrict retarray,
gfc_array_r16 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_r16);
void
-minloc0_16_r16 (gfc_array_i16 * const restrict retarray,
+minloc0_16_r16 (gfc_array_i16 * const restrict retarray,
gfc_array_r16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_r16 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_r16 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_r16 (gfc_array_i16 * const restrict,
gfc_array_r16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_r16);
void
-mminloc0_16_r16 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_r16 (gfc_array_i16 * const restrict retarray,
gfc_array_r16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_r16 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_r16 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_r16 (gfc_array_i16 * const restrict,
gfc_array_r16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_r16);
void
-sminloc0_16_r16 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_r16 (gfc_array_i16 * const restrict retarray,
gfc_array_r16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_r17.c b/libgfortran/generated/minloc0_16_r17.c
index 21a44463c8a6..72d1435a937a 100644
--- a/libgfortran/generated/minloc0_16_r17.c
+++ b/libgfortran/generated/minloc0_16_r17.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_17) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_r17 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_r17 (gfc_array_i16 * const restrict retarray,
gfc_array_r17 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_r17);
void
-minloc0_16_r17 (gfc_array_i16 * const restrict retarray,
+minloc0_16_r17 (gfc_array_i16 * const restrict retarray,
gfc_array_r17 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_r17 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_r17 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_r17 (gfc_array_i16 * const restrict,
gfc_array_r17 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_r17);
void
-mminloc0_16_r17 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_r17 (gfc_array_i16 * const restrict retarray,
gfc_array_r17 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_r17 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_r17 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_r17 (gfc_array_i16 * const restrict,
gfc_array_r17 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_r17);
void
-sminloc0_16_r17 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_r17 (gfc_array_i16 * const restrict retarray,
gfc_array_r17 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_r4.c b/libgfortran/generated/minloc0_16_r4.c
index a71b771d6ddc..9f88813b32d3 100644
--- a/libgfortran/generated/minloc0_16_r4.c
+++ b/libgfortran/generated/minloc0_16_r4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_4) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_r4 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_r4 (gfc_array_i16 * const restrict retarray,
gfc_array_r4 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_r4);
void
-minloc0_16_r4 (gfc_array_i16 * const restrict retarray,
+minloc0_16_r4 (gfc_array_i16 * const restrict retarray,
gfc_array_r4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_r4 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_r4 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_r4 (gfc_array_i16 * const restrict,
gfc_array_r4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_r4);
void
-mminloc0_16_r4 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_r4 (gfc_array_i16 * const restrict retarray,
gfc_array_r4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_r4 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_r4 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_r4 (gfc_array_i16 * const restrict,
gfc_array_r4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_r4);
void
-sminloc0_16_r4 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_r4 (gfc_array_i16 * const restrict retarray,
gfc_array_r4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_r8.c b/libgfortran/generated/minloc0_16_r8.c
index b282fdeb6a00..23f897f2e5c0 100644
--- a/libgfortran/generated/minloc0_16_r8.c
+++ b/libgfortran/generated/minloc0_16_r8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_8) && defined (HAVE_GFC_INTEGER_16)
-extern void minloc0_16_r8 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_r8 (gfc_array_i16 * const restrict retarray,
gfc_array_r8 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_16_r8);
void
-minloc0_16_r8 (gfc_array_i16 * const restrict retarray,
+minloc0_16_r8 (gfc_array_i16 * const restrict retarray,
gfc_array_r8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_16_r8 (gfc_array_i16 * const restrict retarray,
}
}
-extern void mminloc0_16_r8 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_r8 (gfc_array_i16 * const restrict,
gfc_array_r8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_16_r8);
void
-mminloc0_16_r8 (gfc_array_i16 * const restrict retarray,
+mminloc0_16_r8 (gfc_array_i16 * const restrict retarray,
gfc_array_r8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_16_r8 (gfc_array_i16 * const restrict retarray,
}
}
-extern void sminloc0_16_r8 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_r8 (gfc_array_i16 * const restrict,
gfc_array_r8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_16_r8);
void
-sminloc0_16_r8 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_r8 (gfc_array_i16 * const restrict retarray,
gfc_array_r8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_16_s1.c b/libgfortran/generated/minloc0_16_s1.c
index 3b4ff8b914da..2be8e6834836 100644
--- a/libgfortran/generated/minloc0_16_s1.c
+++ b/libgfortran/generated/minloc0_16_s1.c
@@ -44,12 +44,12 @@ compare_fcn (const GFC_UINTEGER_1 *a, const GFC_UINTEGER_1 *b, gfc_charlen_type
}
-extern void minloc0_16_s1 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_s1 (gfc_array_i16 * const restrict retarray,
gfc_array_s1 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len);
export_proto(minloc0_16_s1);
void
-minloc0_16_s1 (gfc_array_i16 * const restrict retarray,
+minloc0_16_s1 (gfc_array_i16 * const restrict retarray,
gfc_array_s1 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -151,7 +151,7 @@ minloc0_16_s1 (gfc_array_i16 * const restrict retarray,
}
-extern void mminloc0_16_s1 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_s1 (gfc_array_i16 * const restrict,
gfc_array_s1 * const restrict, gfc_array_l1 * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(mminloc0_16_s1);
@@ -298,13 +298,13 @@ mminloc0_16_s1 (gfc_array_i16 * const restrict retarray,
}
-extern void sminloc0_16_s1 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_s1 (gfc_array_i16 * const restrict,
gfc_array_s1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(sminloc0_16_s1);
void
-sminloc0_16_s1 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_s1 (gfc_array_i16 * const restrict retarray,
gfc_array_s1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back,
gfc_charlen_type len)
diff --git a/libgfortran/generated/minloc0_16_s4.c b/libgfortran/generated/minloc0_16_s4.c
index e4ee627d6a35..710591a6f733 100644
--- a/libgfortran/generated/minloc0_16_s4.c
+++ b/libgfortran/generated/minloc0_16_s4.c
@@ -44,12 +44,12 @@ compare_fcn (const GFC_UINTEGER_4 *a, const GFC_UINTEGER_4 *b, gfc_charlen_type
}
-extern void minloc0_16_s4 (gfc_array_i16 * const restrict retarray,
+extern void minloc0_16_s4 (gfc_array_i16 * const restrict retarray,
gfc_array_s4 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len);
export_proto(minloc0_16_s4);
void
-minloc0_16_s4 (gfc_array_i16 * const restrict retarray,
+minloc0_16_s4 (gfc_array_i16 * const restrict retarray,
gfc_array_s4 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -151,7 +151,7 @@ minloc0_16_s4 (gfc_array_i16 * const restrict retarray,
}
-extern void mminloc0_16_s4 (gfc_array_i16 * const restrict,
+extern void mminloc0_16_s4 (gfc_array_i16 * const restrict,
gfc_array_s4 * const restrict, gfc_array_l1 * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(mminloc0_16_s4);
@@ -298,13 +298,13 @@ mminloc0_16_s4 (gfc_array_i16 * const restrict retarray,
}
-extern void sminloc0_16_s4 (gfc_array_i16 * const restrict,
+extern void sminloc0_16_s4 (gfc_array_i16 * const restrict,
gfc_array_s4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(sminloc0_16_s4);
void
-sminloc0_16_s4 (gfc_array_i16 * const restrict retarray,
+sminloc0_16_s4 (gfc_array_i16 * const restrict retarray,
gfc_array_s4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back,
gfc_charlen_type len)
diff --git a/libgfortran/generated/minloc0_4_i1.c b/libgfortran/generated/minloc0_4_i1.c
index b82fafe4efe9..16e37f3f69f6 100644
--- a/libgfortran/generated/minloc0_4_i1.c
+++ b/libgfortran/generated/minloc0_4_i1.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_1) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_i1 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_i1 (gfc_array_i4 * const restrict retarray,
gfc_array_i1 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_i1);
void
-minloc0_4_i1 (gfc_array_i4 * const restrict retarray,
+minloc0_4_i1 (gfc_array_i4 * const restrict retarray,
gfc_array_i1 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_i1 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_i1 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_i1 (gfc_array_i4 * const restrict,
gfc_array_i1 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_i1);
void
-mminloc0_4_i1 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_i1 (gfc_array_i4 * const restrict retarray,
gfc_array_i1 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_i1 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_i1 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_i1 (gfc_array_i4 * const restrict,
gfc_array_i1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_i1);
void
-sminloc0_4_i1 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_i1 (gfc_array_i4 * const restrict retarray,
gfc_array_i1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_i16.c b/libgfortran/generated/minloc0_4_i16.c
index 1aa09fade56b..06005724a052 100644
--- a/libgfortran/generated/minloc0_4_i16.c
+++ b/libgfortran/generated/minloc0_4_i16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_16) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_i16 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_i16 (gfc_array_i4 * const restrict retarray,
gfc_array_i16 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_i16);
void
-minloc0_4_i16 (gfc_array_i4 * const restrict retarray,
+minloc0_4_i16 (gfc_array_i4 * const restrict retarray,
gfc_array_i16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_i16 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_i16 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_i16 (gfc_array_i4 * const restrict,
gfc_array_i16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_i16);
void
-mminloc0_4_i16 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_i16 (gfc_array_i4 * const restrict retarray,
gfc_array_i16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_i16 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_i16 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_i16 (gfc_array_i4 * const restrict,
gfc_array_i16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_i16);
void
-sminloc0_4_i16 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_i16 (gfc_array_i4 * const restrict retarray,
gfc_array_i16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_i2.c b/libgfortran/generated/minloc0_4_i2.c
index 14c059d3e349..da1cccfea77a 100644
--- a/libgfortran/generated/minloc0_4_i2.c
+++ b/libgfortran/generated/minloc0_4_i2.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_2) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_i2 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_i2 (gfc_array_i4 * const restrict retarray,
gfc_array_i2 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_i2);
void
-minloc0_4_i2 (gfc_array_i4 * const restrict retarray,
+minloc0_4_i2 (gfc_array_i4 * const restrict retarray,
gfc_array_i2 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_i2 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_i2 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_i2 (gfc_array_i4 * const restrict,
gfc_array_i2 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_i2);
void
-mminloc0_4_i2 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_i2 (gfc_array_i4 * const restrict retarray,
gfc_array_i2 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_i2 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_i2 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_i2 (gfc_array_i4 * const restrict,
gfc_array_i2 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_i2);
void
-sminloc0_4_i2 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_i2 (gfc_array_i4 * const restrict retarray,
gfc_array_i2 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_i4.c b/libgfortran/generated/minloc0_4_i4.c
index ebc8d9ab284a..b49767e3222b 100644
--- a/libgfortran/generated/minloc0_4_i4.c
+++ b/libgfortran/generated/minloc0_4_i4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_4) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_i4 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_i4 (gfc_array_i4 * const restrict retarray,
gfc_array_i4 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_i4);
void
-minloc0_4_i4 (gfc_array_i4 * const restrict retarray,
+minloc0_4_i4 (gfc_array_i4 * const restrict retarray,
gfc_array_i4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_i4 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_i4 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_i4 (gfc_array_i4 * const restrict,
gfc_array_i4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_i4);
void
-mminloc0_4_i4 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_i4 (gfc_array_i4 * const restrict retarray,
gfc_array_i4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_i4 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_i4 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_i4 (gfc_array_i4 * const restrict,
gfc_array_i4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_i4);
void
-sminloc0_4_i4 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_i4 (gfc_array_i4 * const restrict retarray,
gfc_array_i4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_i8.c b/libgfortran/generated/minloc0_4_i8.c
index 5156bbdefa04..6e8f01da1d31 100644
--- a/libgfortran/generated/minloc0_4_i8.c
+++ b/libgfortran/generated/minloc0_4_i8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_8) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_i8 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_i8 (gfc_array_i4 * const restrict retarray,
gfc_array_i8 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_i8);
void
-minloc0_4_i8 (gfc_array_i4 * const restrict retarray,
+minloc0_4_i8 (gfc_array_i4 * const restrict retarray,
gfc_array_i8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_i8 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_i8 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_i8 (gfc_array_i4 * const restrict,
gfc_array_i8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_i8);
void
-mminloc0_4_i8 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_i8 (gfc_array_i4 * const restrict retarray,
gfc_array_i8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_i8 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_i8 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_i8 (gfc_array_i4 * const restrict,
gfc_array_i8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_i8);
void
-sminloc0_4_i8 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_i8 (gfc_array_i4 * const restrict retarray,
gfc_array_i8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_m1.c b/libgfortran/generated/minloc0_4_m1.c
index 144ccc5df3cb..09a443072a22 100644
--- a/libgfortran/generated/minloc0_4_m1.c
+++ b/libgfortran/generated/minloc0_4_m1.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_1) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_m1 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_m1 (gfc_array_i4 * const restrict retarray,
gfc_array_m1 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_m1);
void
-minloc0_4_m1 (gfc_array_i4 * const restrict retarray,
+minloc0_4_m1 (gfc_array_i4 * const restrict retarray,
gfc_array_m1 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_m1 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_m1 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_m1 (gfc_array_i4 * const restrict,
gfc_array_m1 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_m1);
void
-mminloc0_4_m1 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_m1 (gfc_array_i4 * const restrict retarray,
gfc_array_m1 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_m1 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_m1 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_m1 (gfc_array_i4 * const restrict,
gfc_array_m1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_m1);
void
-sminloc0_4_m1 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_m1 (gfc_array_i4 * const restrict retarray,
gfc_array_m1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_m16.c b/libgfortran/generated/minloc0_4_m16.c
index c481cd68e0ec..5111220a0eb0 100644
--- a/libgfortran/generated/minloc0_4_m16.c
+++ b/libgfortran/generated/minloc0_4_m16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_16) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_m16 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_m16 (gfc_array_i4 * const restrict retarray,
gfc_array_m16 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_m16);
void
-minloc0_4_m16 (gfc_array_i4 * const restrict retarray,
+minloc0_4_m16 (gfc_array_i4 * const restrict retarray,
gfc_array_m16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_m16 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_m16 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_m16 (gfc_array_i4 * const restrict,
gfc_array_m16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_m16);
void
-mminloc0_4_m16 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_m16 (gfc_array_i4 * const restrict retarray,
gfc_array_m16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_m16 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_m16 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_m16 (gfc_array_i4 * const restrict,
gfc_array_m16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_m16);
void
-sminloc0_4_m16 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_m16 (gfc_array_i4 * const restrict retarray,
gfc_array_m16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_m2.c b/libgfortran/generated/minloc0_4_m2.c
index c94ee722b93a..540af3e4b81e 100644
--- a/libgfortran/generated/minloc0_4_m2.c
+++ b/libgfortran/generated/minloc0_4_m2.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_2) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_m2 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_m2 (gfc_array_i4 * const restrict retarray,
gfc_array_m2 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_m2);
void
-minloc0_4_m2 (gfc_array_i4 * const restrict retarray,
+minloc0_4_m2 (gfc_array_i4 * const restrict retarray,
gfc_array_m2 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_m2 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_m2 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_m2 (gfc_array_i4 * const restrict,
gfc_array_m2 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_m2);
void
-mminloc0_4_m2 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_m2 (gfc_array_i4 * const restrict retarray,
gfc_array_m2 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_m2 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_m2 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_m2 (gfc_array_i4 * const restrict,
gfc_array_m2 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_m2);
void
-sminloc0_4_m2 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_m2 (gfc_array_i4 * const restrict retarray,
gfc_array_m2 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_m4.c b/libgfortran/generated/minloc0_4_m4.c
index d3b00c0084cb..3d400dd1aa9c 100644
--- a/libgfortran/generated/minloc0_4_m4.c
+++ b/libgfortran/generated/minloc0_4_m4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_4) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_m4 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_m4 (gfc_array_i4 * const restrict retarray,
gfc_array_m4 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_m4);
void
-minloc0_4_m4 (gfc_array_i4 * const restrict retarray,
+minloc0_4_m4 (gfc_array_i4 * const restrict retarray,
gfc_array_m4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_m4 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_m4 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_m4 (gfc_array_i4 * const restrict,
gfc_array_m4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_m4);
void
-mminloc0_4_m4 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_m4 (gfc_array_i4 * const restrict retarray,
gfc_array_m4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_m4 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_m4 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_m4 (gfc_array_i4 * const restrict,
gfc_array_m4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_m4);
void
-sminloc0_4_m4 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_m4 (gfc_array_i4 * const restrict retarray,
gfc_array_m4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_m8.c b/libgfortran/generated/minloc0_4_m8.c
index 676cbcbba3cb..edd46d22a136 100644
--- a/libgfortran/generated/minloc0_4_m8.c
+++ b/libgfortran/generated/minloc0_4_m8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_8) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_m8 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_m8 (gfc_array_i4 * const restrict retarray,
gfc_array_m8 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_m8);
void
-minloc0_4_m8 (gfc_array_i4 * const restrict retarray,
+minloc0_4_m8 (gfc_array_i4 * const restrict retarray,
gfc_array_m8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_m8 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_m8 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_m8 (gfc_array_i4 * const restrict,
gfc_array_m8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_m8);
void
-mminloc0_4_m8 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_m8 (gfc_array_i4 * const restrict retarray,
gfc_array_m8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_m8 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_m8 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_m8 (gfc_array_i4 * const restrict,
gfc_array_m8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_m8);
void
-sminloc0_4_m8 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_m8 (gfc_array_i4 * const restrict retarray,
gfc_array_m8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_r10.c b/libgfortran/generated/minloc0_4_r10.c
index ae9b8dda31a3..dce1a8a988e5 100644
--- a/libgfortran/generated/minloc0_4_r10.c
+++ b/libgfortran/generated/minloc0_4_r10.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_10) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_r10 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_r10 (gfc_array_i4 * const restrict retarray,
gfc_array_r10 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_r10);
void
-minloc0_4_r10 (gfc_array_i4 * const restrict retarray,
+minloc0_4_r10 (gfc_array_i4 * const restrict retarray,
gfc_array_r10 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_r10 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_r10 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_r10 (gfc_array_i4 * const restrict,
gfc_array_r10 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_r10);
void
-mminloc0_4_r10 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_r10 (gfc_array_i4 * const restrict retarray,
gfc_array_r10 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_r10 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_r10 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_r10 (gfc_array_i4 * const restrict,
gfc_array_r10 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_r10);
void
-sminloc0_4_r10 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_r10 (gfc_array_i4 * const restrict retarray,
gfc_array_r10 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_r16.c b/libgfortran/generated/minloc0_4_r16.c
index 160d883d034d..0848d4a0e88f 100644
--- a/libgfortran/generated/minloc0_4_r16.c
+++ b/libgfortran/generated/minloc0_4_r16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_16) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_r16 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_r16 (gfc_array_i4 * const restrict retarray,
gfc_array_r16 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_r16);
void
-minloc0_4_r16 (gfc_array_i4 * const restrict retarray,
+minloc0_4_r16 (gfc_array_i4 * const restrict retarray,
gfc_array_r16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_r16 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_r16 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_r16 (gfc_array_i4 * const restrict,
gfc_array_r16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_r16);
void
-mminloc0_4_r16 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_r16 (gfc_array_i4 * const restrict retarray,
gfc_array_r16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_r16 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_r16 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_r16 (gfc_array_i4 * const restrict,
gfc_array_r16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_r16);
void
-sminloc0_4_r16 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_r16 (gfc_array_i4 * const restrict retarray,
gfc_array_r16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_r17.c b/libgfortran/generated/minloc0_4_r17.c
index 0ca8bdce6c34..e7fe517faca5 100644
--- a/libgfortran/generated/minloc0_4_r17.c
+++ b/libgfortran/generated/minloc0_4_r17.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_17) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_r17 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_r17 (gfc_array_i4 * const restrict retarray,
gfc_array_r17 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_r17);
void
-minloc0_4_r17 (gfc_array_i4 * const restrict retarray,
+minloc0_4_r17 (gfc_array_i4 * const restrict retarray,
gfc_array_r17 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_r17 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_r17 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_r17 (gfc_array_i4 * const restrict,
gfc_array_r17 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_r17);
void
-mminloc0_4_r17 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_r17 (gfc_array_i4 * const restrict retarray,
gfc_array_r17 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_r17 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_r17 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_r17 (gfc_array_i4 * const restrict,
gfc_array_r17 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_r17);
void
-sminloc0_4_r17 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_r17 (gfc_array_i4 * const restrict retarray,
gfc_array_r17 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_r4.c b/libgfortran/generated/minloc0_4_r4.c
index ece2261e7ad1..f881bb9353a2 100644
--- a/libgfortran/generated/minloc0_4_r4.c
+++ b/libgfortran/generated/minloc0_4_r4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_4) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_r4 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_r4 (gfc_array_i4 * const restrict retarray,
gfc_array_r4 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_r4);
void
-minloc0_4_r4 (gfc_array_i4 * const restrict retarray,
+minloc0_4_r4 (gfc_array_i4 * const restrict retarray,
gfc_array_r4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_r4 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_r4 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_r4 (gfc_array_i4 * const restrict,
gfc_array_r4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_r4);
void
-mminloc0_4_r4 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_r4 (gfc_array_i4 * const restrict retarray,
gfc_array_r4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_r4 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_r4 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_r4 (gfc_array_i4 * const restrict,
gfc_array_r4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_r4);
void
-sminloc0_4_r4 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_r4 (gfc_array_i4 * const restrict retarray,
gfc_array_r4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_r8.c b/libgfortran/generated/minloc0_4_r8.c
index b0f76f22972c..6dbd07146916 100644
--- a/libgfortran/generated/minloc0_4_r8.c
+++ b/libgfortran/generated/minloc0_4_r8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_8) && defined (HAVE_GFC_INTEGER_4)
-extern void minloc0_4_r8 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_r8 (gfc_array_i4 * const restrict retarray,
gfc_array_r8 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_4_r8);
void
-minloc0_4_r8 (gfc_array_i4 * const restrict retarray,
+minloc0_4_r8 (gfc_array_i4 * const restrict retarray,
gfc_array_r8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_4_r8 (gfc_array_i4 * const restrict retarray,
}
}
-extern void mminloc0_4_r8 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_r8 (gfc_array_i4 * const restrict,
gfc_array_r8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_4_r8);
void
-mminloc0_4_r8 (gfc_array_i4 * const restrict retarray,
+mminloc0_4_r8 (gfc_array_i4 * const restrict retarray,
gfc_array_r8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_4_r8 (gfc_array_i4 * const restrict retarray,
}
}
-extern void sminloc0_4_r8 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_r8 (gfc_array_i4 * const restrict,
gfc_array_r8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_4_r8);
void
-sminloc0_4_r8 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_r8 (gfc_array_i4 * const restrict retarray,
gfc_array_r8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_4_s1.c b/libgfortran/generated/minloc0_4_s1.c
index 2c1d9b14ab67..7488f41b514e 100644
--- a/libgfortran/generated/minloc0_4_s1.c
+++ b/libgfortran/generated/minloc0_4_s1.c
@@ -44,12 +44,12 @@ compare_fcn (const GFC_UINTEGER_1 *a, const GFC_UINTEGER_1 *b, gfc_charlen_type
}
-extern void minloc0_4_s1 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_s1 (gfc_array_i4 * const restrict retarray,
gfc_array_s1 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len);
export_proto(minloc0_4_s1);
void
-minloc0_4_s1 (gfc_array_i4 * const restrict retarray,
+minloc0_4_s1 (gfc_array_i4 * const restrict retarray,
gfc_array_s1 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -151,7 +151,7 @@ minloc0_4_s1 (gfc_array_i4 * const restrict retarray,
}
-extern void mminloc0_4_s1 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_s1 (gfc_array_i4 * const restrict,
gfc_array_s1 * const restrict, gfc_array_l1 * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(mminloc0_4_s1);
@@ -298,13 +298,13 @@ mminloc0_4_s1 (gfc_array_i4 * const restrict retarray,
}
-extern void sminloc0_4_s1 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_s1 (gfc_array_i4 * const restrict,
gfc_array_s1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(sminloc0_4_s1);
void
-sminloc0_4_s1 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_s1 (gfc_array_i4 * const restrict retarray,
gfc_array_s1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back,
gfc_charlen_type len)
diff --git a/libgfortran/generated/minloc0_4_s4.c b/libgfortran/generated/minloc0_4_s4.c
index b966f401666e..2f0e578d80a4 100644
--- a/libgfortran/generated/minloc0_4_s4.c
+++ b/libgfortran/generated/minloc0_4_s4.c
@@ -44,12 +44,12 @@ compare_fcn (const GFC_UINTEGER_4 *a, const GFC_UINTEGER_4 *b, gfc_charlen_type
}
-extern void minloc0_4_s4 (gfc_array_i4 * const restrict retarray,
+extern void minloc0_4_s4 (gfc_array_i4 * const restrict retarray,
gfc_array_s4 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len);
export_proto(minloc0_4_s4);
void
-minloc0_4_s4 (gfc_array_i4 * const restrict retarray,
+minloc0_4_s4 (gfc_array_i4 * const restrict retarray,
gfc_array_s4 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -151,7 +151,7 @@ minloc0_4_s4 (gfc_array_i4 * const restrict retarray,
}
-extern void mminloc0_4_s4 (gfc_array_i4 * const restrict,
+extern void mminloc0_4_s4 (gfc_array_i4 * const restrict,
gfc_array_s4 * const restrict, gfc_array_l1 * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(mminloc0_4_s4);
@@ -298,13 +298,13 @@ mminloc0_4_s4 (gfc_array_i4 * const restrict retarray,
}
-extern void sminloc0_4_s4 (gfc_array_i4 * const restrict,
+extern void sminloc0_4_s4 (gfc_array_i4 * const restrict,
gfc_array_s4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(sminloc0_4_s4);
void
-sminloc0_4_s4 (gfc_array_i4 * const restrict retarray,
+sminloc0_4_s4 (gfc_array_i4 * const restrict retarray,
gfc_array_s4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back,
gfc_charlen_type len)
diff --git a/libgfortran/generated/minloc0_8_i1.c b/libgfortran/generated/minloc0_8_i1.c
index 733ac618af39..b181a3eba47a 100644
--- a/libgfortran/generated/minloc0_8_i1.c
+++ b/libgfortran/generated/minloc0_8_i1.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_1) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_i1 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_i1 (gfc_array_i8 * const restrict retarray,
gfc_array_i1 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_i1);
void
-minloc0_8_i1 (gfc_array_i8 * const restrict retarray,
+minloc0_8_i1 (gfc_array_i8 * const restrict retarray,
gfc_array_i1 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_i1 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_i1 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_i1 (gfc_array_i8 * const restrict,
gfc_array_i1 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_i1);
void
-mminloc0_8_i1 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_i1 (gfc_array_i8 * const restrict retarray,
gfc_array_i1 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_i1 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_i1 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_i1 (gfc_array_i8 * const restrict,
gfc_array_i1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_i1);
void
-sminloc0_8_i1 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_i1 (gfc_array_i8 * const restrict retarray,
gfc_array_i1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_i16.c b/libgfortran/generated/minloc0_8_i16.c
index f04bebfaa153..01d8bb81267c 100644
--- a/libgfortran/generated/minloc0_8_i16.c
+++ b/libgfortran/generated/minloc0_8_i16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_16) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_i16 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_i16 (gfc_array_i8 * const restrict retarray,
gfc_array_i16 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_i16);
void
-minloc0_8_i16 (gfc_array_i8 * const restrict retarray,
+minloc0_8_i16 (gfc_array_i8 * const restrict retarray,
gfc_array_i16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_i16 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_i16 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_i16 (gfc_array_i8 * const restrict,
gfc_array_i16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_i16);
void
-mminloc0_8_i16 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_i16 (gfc_array_i8 * const restrict retarray,
gfc_array_i16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_i16 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_i16 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_i16 (gfc_array_i8 * const restrict,
gfc_array_i16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_i16);
void
-sminloc0_8_i16 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_i16 (gfc_array_i8 * const restrict retarray,
gfc_array_i16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_i2.c b/libgfortran/generated/minloc0_8_i2.c
index 599f1d873396..e7cf9414e5c2 100644
--- a/libgfortran/generated/minloc0_8_i2.c
+++ b/libgfortran/generated/minloc0_8_i2.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_2) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_i2 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_i2 (gfc_array_i8 * const restrict retarray,
gfc_array_i2 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_i2);
void
-minloc0_8_i2 (gfc_array_i8 * const restrict retarray,
+minloc0_8_i2 (gfc_array_i8 * const restrict retarray,
gfc_array_i2 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_i2 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_i2 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_i2 (gfc_array_i8 * const restrict,
gfc_array_i2 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_i2);
void
-mminloc0_8_i2 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_i2 (gfc_array_i8 * const restrict retarray,
gfc_array_i2 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_i2 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_i2 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_i2 (gfc_array_i8 * const restrict,
gfc_array_i2 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_i2);
void
-sminloc0_8_i2 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_i2 (gfc_array_i8 * const restrict retarray,
gfc_array_i2 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_i4.c b/libgfortran/generated/minloc0_8_i4.c
index 33d1d2b77755..6af189976e99 100644
--- a/libgfortran/generated/minloc0_8_i4.c
+++ b/libgfortran/generated/minloc0_8_i4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_4) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_i4 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_i4 (gfc_array_i8 * const restrict retarray,
gfc_array_i4 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_i4);
void
-minloc0_8_i4 (gfc_array_i8 * const restrict retarray,
+minloc0_8_i4 (gfc_array_i8 * const restrict retarray,
gfc_array_i4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_i4 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_i4 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_i4 (gfc_array_i8 * const restrict,
gfc_array_i4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_i4);
void
-mminloc0_8_i4 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_i4 (gfc_array_i8 * const restrict retarray,
gfc_array_i4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_i4 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_i4 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_i4 (gfc_array_i8 * const restrict,
gfc_array_i4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_i4);
void
-sminloc0_8_i4 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_i4 (gfc_array_i8 * const restrict retarray,
gfc_array_i4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_i8.c b/libgfortran/generated/minloc0_8_i8.c
index f6a8ac338115..3ff6a30060ab 100644
--- a/libgfortran/generated/minloc0_8_i8.c
+++ b/libgfortran/generated/minloc0_8_i8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_8) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_i8 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_i8 (gfc_array_i8 * const restrict retarray,
gfc_array_i8 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_i8);
void
-minloc0_8_i8 (gfc_array_i8 * const restrict retarray,
+minloc0_8_i8 (gfc_array_i8 * const restrict retarray,
gfc_array_i8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_i8 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_i8 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_i8 (gfc_array_i8 * const restrict,
gfc_array_i8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_i8);
void
-mminloc0_8_i8 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_i8 (gfc_array_i8 * const restrict retarray,
gfc_array_i8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_i8 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_i8 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_i8 (gfc_array_i8 * const restrict,
gfc_array_i8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_i8);
void
-sminloc0_8_i8 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_i8 (gfc_array_i8 * const restrict retarray,
gfc_array_i8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_m1.c b/libgfortran/generated/minloc0_8_m1.c
index 9831d43f41df..8a92a7da7f15 100644
--- a/libgfortran/generated/minloc0_8_m1.c
+++ b/libgfortran/generated/minloc0_8_m1.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_1) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_m1 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_m1 (gfc_array_i8 * const restrict retarray,
gfc_array_m1 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_m1);
void
-minloc0_8_m1 (gfc_array_i8 * const restrict retarray,
+minloc0_8_m1 (gfc_array_i8 * const restrict retarray,
gfc_array_m1 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_m1 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_m1 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_m1 (gfc_array_i8 * const restrict,
gfc_array_m1 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_m1);
void
-mminloc0_8_m1 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_m1 (gfc_array_i8 * const restrict retarray,
gfc_array_m1 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_m1 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_m1 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_m1 (gfc_array_i8 * const restrict,
gfc_array_m1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_m1);
void
-sminloc0_8_m1 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_m1 (gfc_array_i8 * const restrict retarray,
gfc_array_m1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_m16.c b/libgfortran/generated/minloc0_8_m16.c
index 9260815d6ad2..1c20b2b5e867 100644
--- a/libgfortran/generated/minloc0_8_m16.c
+++ b/libgfortran/generated/minloc0_8_m16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_16) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_m16 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_m16 (gfc_array_i8 * const restrict retarray,
gfc_array_m16 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_m16);
void
-minloc0_8_m16 (gfc_array_i8 * const restrict retarray,
+minloc0_8_m16 (gfc_array_i8 * const restrict retarray,
gfc_array_m16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_m16 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_m16 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_m16 (gfc_array_i8 * const restrict,
gfc_array_m16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_m16);
void
-mminloc0_8_m16 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_m16 (gfc_array_i8 * const restrict retarray,
gfc_array_m16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_m16 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_m16 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_m16 (gfc_array_i8 * const restrict,
gfc_array_m16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_m16);
void
-sminloc0_8_m16 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_m16 (gfc_array_i8 * const restrict retarray,
gfc_array_m16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_m2.c b/libgfortran/generated/minloc0_8_m2.c
index 141f702e17a2..74631691e555 100644
--- a/libgfortran/generated/minloc0_8_m2.c
+++ b/libgfortran/generated/minloc0_8_m2.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_2) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_m2 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_m2 (gfc_array_i8 * const restrict retarray,
gfc_array_m2 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_m2);
void
-minloc0_8_m2 (gfc_array_i8 * const restrict retarray,
+minloc0_8_m2 (gfc_array_i8 * const restrict retarray,
gfc_array_m2 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_m2 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_m2 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_m2 (gfc_array_i8 * const restrict,
gfc_array_m2 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_m2);
void
-mminloc0_8_m2 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_m2 (gfc_array_i8 * const restrict retarray,
gfc_array_m2 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_m2 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_m2 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_m2 (gfc_array_i8 * const restrict,
gfc_array_m2 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_m2);
void
-sminloc0_8_m2 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_m2 (gfc_array_i8 * const restrict retarray,
gfc_array_m2 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_m4.c b/libgfortran/generated/minloc0_8_m4.c
index ce4811ab9d66..f4f0b4c7b296 100644
--- a/libgfortran/generated/minloc0_8_m4.c
+++ b/libgfortran/generated/minloc0_8_m4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_4) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_m4 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_m4 (gfc_array_i8 * const restrict retarray,
gfc_array_m4 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_m4);
void
-minloc0_8_m4 (gfc_array_i8 * const restrict retarray,
+minloc0_8_m4 (gfc_array_i8 * const restrict retarray,
gfc_array_m4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_m4 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_m4 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_m4 (gfc_array_i8 * const restrict,
gfc_array_m4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_m4);
void
-mminloc0_8_m4 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_m4 (gfc_array_i8 * const restrict retarray,
gfc_array_m4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_m4 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_m4 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_m4 (gfc_array_i8 * const restrict,
gfc_array_m4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_m4);
void
-sminloc0_8_m4 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_m4 (gfc_array_i8 * const restrict retarray,
gfc_array_m4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_m8.c b/libgfortran/generated/minloc0_8_m8.c
index 699485f28f8a..439cf22db050 100644
--- a/libgfortran/generated/minloc0_8_m8.c
+++ b/libgfortran/generated/minloc0_8_m8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_8) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_m8 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_m8 (gfc_array_i8 * const restrict retarray,
gfc_array_m8 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_m8);
void
-minloc0_8_m8 (gfc_array_i8 * const restrict retarray,
+minloc0_8_m8 (gfc_array_i8 * const restrict retarray,
gfc_array_m8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_m8 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_m8 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_m8 (gfc_array_i8 * const restrict,
gfc_array_m8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_m8);
void
-mminloc0_8_m8 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_m8 (gfc_array_i8 * const restrict retarray,
gfc_array_m8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_m8 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_m8 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_m8 (gfc_array_i8 * const restrict,
gfc_array_m8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_m8);
void
-sminloc0_8_m8 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_m8 (gfc_array_i8 * const restrict retarray,
gfc_array_m8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_r10.c b/libgfortran/generated/minloc0_8_r10.c
index 3475943ca408..8d5ff4237b3d 100644
--- a/libgfortran/generated/minloc0_8_r10.c
+++ b/libgfortran/generated/minloc0_8_r10.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_10) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_r10 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_r10 (gfc_array_i8 * const restrict retarray,
gfc_array_r10 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_r10);
void
-minloc0_8_r10 (gfc_array_i8 * const restrict retarray,
+minloc0_8_r10 (gfc_array_i8 * const restrict retarray,
gfc_array_r10 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_r10 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_r10 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_r10 (gfc_array_i8 * const restrict,
gfc_array_r10 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_r10);
void
-mminloc0_8_r10 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_r10 (gfc_array_i8 * const restrict retarray,
gfc_array_r10 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_r10 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_r10 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_r10 (gfc_array_i8 * const restrict,
gfc_array_r10 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_r10);
void
-sminloc0_8_r10 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_r10 (gfc_array_i8 * const restrict retarray,
gfc_array_r10 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_r16.c b/libgfortran/generated/minloc0_8_r16.c
index ec904fe9f611..7f3ef3027878 100644
--- a/libgfortran/generated/minloc0_8_r16.c
+++ b/libgfortran/generated/minloc0_8_r16.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_16) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_r16 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_r16 (gfc_array_i8 * const restrict retarray,
gfc_array_r16 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_r16);
void
-minloc0_8_r16 (gfc_array_i8 * const restrict retarray,
+minloc0_8_r16 (gfc_array_i8 * const restrict retarray,
gfc_array_r16 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_r16 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_r16 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_r16 (gfc_array_i8 * const restrict,
gfc_array_r16 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_r16);
void
-mminloc0_8_r16 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_r16 (gfc_array_i8 * const restrict retarray,
gfc_array_r16 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_r16 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_r16 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_r16 (gfc_array_i8 * const restrict,
gfc_array_r16 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_r16);
void
-sminloc0_8_r16 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_r16 (gfc_array_i8 * const restrict retarray,
gfc_array_r16 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_r17.c b/libgfortran/generated/minloc0_8_r17.c
index bea85243e1cc..c6425fee9bb3 100644
--- a/libgfortran/generated/minloc0_8_r17.c
+++ b/libgfortran/generated/minloc0_8_r17.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_17) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_r17 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_r17 (gfc_array_i8 * const restrict retarray,
gfc_array_r17 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_r17);
void
-minloc0_8_r17 (gfc_array_i8 * const restrict retarray,
+minloc0_8_r17 (gfc_array_i8 * const restrict retarray,
gfc_array_r17 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_r17 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_r17 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_r17 (gfc_array_i8 * const restrict,
gfc_array_r17 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_r17);
void
-mminloc0_8_r17 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_r17 (gfc_array_i8 * const restrict retarray,
gfc_array_r17 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_r17 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_r17 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_r17 (gfc_array_i8 * const restrict,
gfc_array_r17 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_r17);
void
-sminloc0_8_r17 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_r17 (gfc_array_i8 * const restrict retarray,
gfc_array_r17 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_r4.c b/libgfortran/generated/minloc0_8_r4.c
index bce2235193d4..5dd65459f3c5 100644
--- a/libgfortran/generated/minloc0_8_r4.c
+++ b/libgfortran/generated/minloc0_8_r4.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_4) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_r4 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_r4 (gfc_array_i8 * const restrict retarray,
gfc_array_r4 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_r4);
void
-minloc0_8_r4 (gfc_array_i8 * const restrict retarray,
+minloc0_8_r4 (gfc_array_i8 * const restrict retarray,
gfc_array_r4 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_r4 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_r4 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_r4 (gfc_array_i8 * const restrict,
gfc_array_r4 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_r4);
void
-mminloc0_8_r4 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_r4 (gfc_array_i8 * const restrict retarray,
gfc_array_r4 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_r4 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_r4 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_r4 (gfc_array_i8 * const restrict,
gfc_array_r4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_r4);
void
-sminloc0_8_r4 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_r4 (gfc_array_i8 * const restrict retarray,
gfc_array_r4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_r8.c b/libgfortran/generated/minloc0_8_r8.c
index 81e7d50055da..0c1f479c0cf7 100644
--- a/libgfortran/generated/minloc0_8_r8.c
+++ b/libgfortran/generated/minloc0_8_r8.c
@@ -30,12 +30,12 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_8) && defined (HAVE_GFC_INTEGER_8)
-extern void minloc0_8_r8 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_r8 (gfc_array_i8 * const restrict retarray,
gfc_array_r8 * const restrict array, GFC_LOGICAL_4);
export_proto(minloc0_8_r8);
void
-minloc0_8_r8 (gfc_array_i8 * const restrict retarray,
+minloc0_8_r8 (gfc_array_i8 * const restrict retarray,
gfc_array_r8 * const restrict array, GFC_LOGICAL_4 back)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -176,13 +176,13 @@ minloc0_8_r8 (gfc_array_i8 * const restrict retarray,
}
}
-extern void mminloc0_8_r8 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_r8 (gfc_array_i8 * const restrict,
gfc_array_r8 * const restrict, gfc_array_l1 * const restrict,
GFC_LOGICAL_4);
export_proto(mminloc0_8_r8);
void
-mminloc0_8_r8 (gfc_array_i8 * const restrict retarray,
+mminloc0_8_r8 (gfc_array_i8 * const restrict retarray,
gfc_array_r8 * const restrict array,
gfc_array_l1 * const restrict mask, GFC_LOGICAL_4 back)
{
@@ -361,12 +361,12 @@ mminloc0_8_r8 (gfc_array_i8 * const restrict retarray,
}
}
-extern void sminloc0_8_r8 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_r8 (gfc_array_i8 * const restrict,
gfc_array_r8 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4);
export_proto(sminloc0_8_r8);
void
-sminloc0_8_r8 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_r8 (gfc_array_i8 * const restrict retarray,
gfc_array_r8 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back)
{
diff --git a/libgfortran/generated/minloc0_8_s1.c b/libgfortran/generated/minloc0_8_s1.c
index 735120829e14..987fe86c37f7 100644
--- a/libgfortran/generated/minloc0_8_s1.c
+++ b/libgfortran/generated/minloc0_8_s1.c
@@ -44,12 +44,12 @@ compare_fcn (const GFC_UINTEGER_1 *a, const GFC_UINTEGER_1 *b, gfc_charlen_type
}
-extern void minloc0_8_s1 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_s1 (gfc_array_i8 * const restrict retarray,
gfc_array_s1 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len);
export_proto(minloc0_8_s1);
void
-minloc0_8_s1 (gfc_array_i8 * const restrict retarray,
+minloc0_8_s1 (gfc_array_i8 * const restrict retarray,
gfc_array_s1 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -151,7 +151,7 @@ minloc0_8_s1 (gfc_array_i8 * const restrict retarray,
}
-extern void mminloc0_8_s1 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_s1 (gfc_array_i8 * const restrict,
gfc_array_s1 * const restrict, gfc_array_l1 * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(mminloc0_8_s1);
@@ -298,13 +298,13 @@ mminloc0_8_s1 (gfc_array_i8 * const restrict retarray,
}
-extern void sminloc0_8_s1 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_s1 (gfc_array_i8 * const restrict,
gfc_array_s1 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(sminloc0_8_s1);
void
-sminloc0_8_s1 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_s1 (gfc_array_i8 * const restrict retarray,
gfc_array_s1 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back,
gfc_charlen_type len)
diff --git a/libgfortran/generated/minloc0_8_s4.c b/libgfortran/generated/minloc0_8_s4.c
index ec0ea6d23713..d2e30e9e30da 100644
--- a/libgfortran/generated/minloc0_8_s4.c
+++ b/libgfortran/generated/minloc0_8_s4.c
@@ -44,12 +44,12 @@ compare_fcn (const GFC_UINTEGER_4 *a, const GFC_UINTEGER_4 *b, gfc_charlen_type
}
-extern void minloc0_8_s4 (gfc_array_i8 * const restrict retarray,
+extern void minloc0_8_s4 (gfc_array_i8 * const restrict retarray,
gfc_array_s4 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len);
export_proto(minloc0_8_s4);
void
-minloc0_8_s4 (gfc_array_i8 * const restrict retarray,
+minloc0_8_s4 (gfc_array_i8 * const restrict retarray,
gfc_array_s4 * const restrict array, GFC_LOGICAL_4 back, gfc_charlen_type len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -151,7 +151,7 @@ minloc0_8_s4 (gfc_array_i8 * const restrict retarray,
}
-extern void mminloc0_8_s4 (gfc_array_i8 * const restrict,
+extern void mminloc0_8_s4 (gfc_array_i8 * const restrict,
gfc_array_s4 * const restrict, gfc_array_l1 * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(mminloc0_8_s4);
@@ -298,13 +298,13 @@ mminloc0_8_s4 (gfc_array_i8 * const restrict retarray,
}
-extern void sminloc0_8_s4 (gfc_array_i8 * const restrict,
+extern void sminloc0_8_s4 (gfc_array_i8 * const restrict,
gfc_array_s4 * const restrict, GFC_LOGICAL_4 *, GFC_LOGICAL_4 back,
gfc_charlen_type len);
export_proto(sminloc0_8_s4);
void
-sminloc0_8_s4 (gfc_array_i8 * const restrict retarray,
+sminloc0_8_s4 (gfc_array_i8 * const restrict retarray,
gfc_array_s4 * const restrict array,
GFC_LOGICAL_4 * mask, GFC_LOGICAL_4 back,
gfc_charlen_type len)
diff --git a/libgfortran/generated/minloc1_16_i1.c b/libgfortran/generated/minloc1_16_i1.c
index 53754fa7e73c..3bf70cecb8a1 100644
--- a/libgfortran/generated/minloc1_16_i1.c
+++ b/libgfortran/generated/minloc1_16_i1.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_i1 (gfc_array_i16 * const restrict,
+extern void minloc1_16_i1 (gfc_array_i16 * const restrict,
gfc_array_i1 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_i1);
diff --git a/libgfortran/generated/minloc1_16_i16.c b/libgfortran/generated/minloc1_16_i16.c
index 1b8474f58ac7..cba1541bec3c 100644
--- a/libgfortran/generated/minloc1_16_i16.c
+++ b/libgfortran/generated/minloc1_16_i16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_i16 (gfc_array_i16 * const restrict,
+extern void minloc1_16_i16 (gfc_array_i16 * const restrict,
gfc_array_i16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_i16);
diff --git a/libgfortran/generated/minloc1_16_i2.c b/libgfortran/generated/minloc1_16_i2.c
index 51dc326990b6..b54a7568f5a9 100644
--- a/libgfortran/generated/minloc1_16_i2.c
+++ b/libgfortran/generated/minloc1_16_i2.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_i2 (gfc_array_i16 * const restrict,
+extern void minloc1_16_i2 (gfc_array_i16 * const restrict,
gfc_array_i2 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_i2);
diff --git a/libgfortran/generated/minloc1_16_i4.c b/libgfortran/generated/minloc1_16_i4.c
index f8049d30d82b..f73b896e99a9 100644
--- a/libgfortran/generated/minloc1_16_i4.c
+++ b/libgfortran/generated/minloc1_16_i4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_i4 (gfc_array_i16 * const restrict,
+extern void minloc1_16_i4 (gfc_array_i16 * const restrict,
gfc_array_i4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_i4);
diff --git a/libgfortran/generated/minloc1_16_i8.c b/libgfortran/generated/minloc1_16_i8.c
index 7d30d745b62c..1a61a4794613 100644
--- a/libgfortran/generated/minloc1_16_i8.c
+++ b/libgfortran/generated/minloc1_16_i8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_i8 (gfc_array_i16 * const restrict,
+extern void minloc1_16_i8 (gfc_array_i16 * const restrict,
gfc_array_i8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_i8);
diff --git a/libgfortran/generated/minloc1_16_m1.c b/libgfortran/generated/minloc1_16_m1.c
index f45bbb834169..b52ed2767d26 100644
--- a/libgfortran/generated/minloc1_16_m1.c
+++ b/libgfortran/generated/minloc1_16_m1.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_m1 (gfc_array_i16 * const restrict,
+extern void minloc1_16_m1 (gfc_array_i16 * const restrict,
gfc_array_m1 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_m1);
diff --git a/libgfortran/generated/minloc1_16_m16.c b/libgfortran/generated/minloc1_16_m16.c
index 09641c1258b9..b94d42307b8f 100644
--- a/libgfortran/generated/minloc1_16_m16.c
+++ b/libgfortran/generated/minloc1_16_m16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_m16 (gfc_array_i16 * const restrict,
+extern void minloc1_16_m16 (gfc_array_i16 * const restrict,
gfc_array_m16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_m16);
diff --git a/libgfortran/generated/minloc1_16_m2.c b/libgfortran/generated/minloc1_16_m2.c
index 47f6598b4ec1..b1e7b12971a6 100644
--- a/libgfortran/generated/minloc1_16_m2.c
+++ b/libgfortran/generated/minloc1_16_m2.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_m2 (gfc_array_i16 * const restrict,
+extern void minloc1_16_m2 (gfc_array_i16 * const restrict,
gfc_array_m2 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_m2);
diff --git a/libgfortran/generated/minloc1_16_m4.c b/libgfortran/generated/minloc1_16_m4.c
index 0fe7a5c0852e..de58cdab44e3 100644
--- a/libgfortran/generated/minloc1_16_m4.c
+++ b/libgfortran/generated/minloc1_16_m4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_m4 (gfc_array_i16 * const restrict,
+extern void minloc1_16_m4 (gfc_array_i16 * const restrict,
gfc_array_m4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_m4);
diff --git a/libgfortran/generated/minloc1_16_m8.c b/libgfortran/generated/minloc1_16_m8.c
index 4cc5d8b6beee..a4b5948751ac 100644
--- a/libgfortran/generated/minloc1_16_m8.c
+++ b/libgfortran/generated/minloc1_16_m8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_m8 (gfc_array_i16 * const restrict,
+extern void minloc1_16_m8 (gfc_array_i16 * const restrict,
gfc_array_m8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_m8);
diff --git a/libgfortran/generated/minloc1_16_r10.c b/libgfortran/generated/minloc1_16_r10.c
index db3b03fb0557..aafef1caf949 100644
--- a/libgfortran/generated/minloc1_16_r10.c
+++ b/libgfortran/generated/minloc1_16_r10.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_r10 (gfc_array_i16 * const restrict,
+extern void minloc1_16_r10 (gfc_array_i16 * const restrict,
gfc_array_r10 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_r10);
diff --git a/libgfortran/generated/minloc1_16_r16.c b/libgfortran/generated/minloc1_16_r16.c
index 6d7baade1f47..7599a9e21088 100644
--- a/libgfortran/generated/minloc1_16_r16.c
+++ b/libgfortran/generated/minloc1_16_r16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_r16 (gfc_array_i16 * const restrict,
+extern void minloc1_16_r16 (gfc_array_i16 * const restrict,
gfc_array_r16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_r16);
diff --git a/libgfortran/generated/minloc1_16_r17.c b/libgfortran/generated/minloc1_16_r17.c
index 5b1aeadf610d..3866369310a4 100644
--- a/libgfortran/generated/minloc1_16_r17.c
+++ b/libgfortran/generated/minloc1_16_r17.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_r17 (gfc_array_i16 * const restrict,
+extern void minloc1_16_r17 (gfc_array_i16 * const restrict,
gfc_array_r17 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_r17);
diff --git a/libgfortran/generated/minloc1_16_r4.c b/libgfortran/generated/minloc1_16_r4.c
index aa1803af9fd7..bec01204d5b2 100644
--- a/libgfortran/generated/minloc1_16_r4.c
+++ b/libgfortran/generated/minloc1_16_r4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_r4 (gfc_array_i16 * const restrict,
+extern void minloc1_16_r4 (gfc_array_i16 * const restrict,
gfc_array_r4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_r4);
diff --git a/libgfortran/generated/minloc1_16_r8.c b/libgfortran/generated/minloc1_16_r8.c
index 026909654ea9..56a0e831d3cc 100644
--- a/libgfortran/generated/minloc1_16_r8.c
+++ b/libgfortran/generated/minloc1_16_r8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_16_r8 (gfc_array_i16 * const restrict,
+extern void minloc1_16_r8 (gfc_array_i16 * const restrict,
gfc_array_r8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_16_r8);
diff --git a/libgfortran/generated/minloc1_16_s1.c b/libgfortran/generated/minloc1_16_s1.c
index 49a132fb7af5..f48827d284fd 100644
--- a/libgfortran/generated/minloc1_16_s1.c
+++ b/libgfortran/generated/minloc1_16_s1.c
@@ -42,7 +42,7 @@ compare_fcn (const GFC_UINTEGER_1 *a, const GFC_UINTEGER_1 *b, gfc_charlen_type
return memcmp_char4 (a, b, n);
}
-extern void minloc1_16_s1 (gfc_array_i16 * const restrict,
+extern void minloc1_16_s1 (gfc_array_i16 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type);
export_proto(minloc1_16_s1);
@@ -207,7 +207,7 @@ minloc1_16_s1 (gfc_array_i16 * const restrict retarray,
}
-extern void mminloc1_16_s1 (gfc_array_i16 * const restrict,
+extern void mminloc1_16_s1 (gfc_array_i16 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict,
gfc_array_l1 * const restrict, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(mminloc1_16_s1);
@@ -413,7 +413,7 @@ mminloc1_16_s1 (gfc_array_i16 * const restrict retarray,
}
-extern void sminloc1_16_s1 (gfc_array_i16 * const restrict,
+extern void sminloc1_16_s1 (gfc_array_i16 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict,
GFC_LOGICAL_4 *, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(sminloc1_16_s1);
diff --git a/libgfortran/generated/minloc1_16_s4.c b/libgfortran/generated/minloc1_16_s4.c
index 1190d7858fd8..1e5666dedb6b 100644
--- a/libgfortran/generated/minloc1_16_s4.c
+++ b/libgfortran/generated/minloc1_16_s4.c
@@ -42,7 +42,7 @@ compare_fcn (const GFC_UINTEGER_4 *a, const GFC_UINTEGER_4 *b, gfc_charlen_type
return memcmp_char4 (a, b, n);
}
-extern void minloc1_16_s4 (gfc_array_i16 * const restrict,
+extern void minloc1_16_s4 (gfc_array_i16 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type);
export_proto(minloc1_16_s4);
@@ -207,7 +207,7 @@ minloc1_16_s4 (gfc_array_i16 * const restrict retarray,
}
-extern void mminloc1_16_s4 (gfc_array_i16 * const restrict,
+extern void mminloc1_16_s4 (gfc_array_i16 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict,
gfc_array_l1 * const restrict, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(mminloc1_16_s4);
@@ -413,7 +413,7 @@ mminloc1_16_s4 (gfc_array_i16 * const restrict retarray,
}
-extern void sminloc1_16_s4 (gfc_array_i16 * const restrict,
+extern void sminloc1_16_s4 (gfc_array_i16 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict,
GFC_LOGICAL_4 *, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(sminloc1_16_s4);
diff --git a/libgfortran/generated/minloc1_4_i1.c b/libgfortran/generated/minloc1_4_i1.c
index e83091a2c442..3ce295b6f561 100644
--- a/libgfortran/generated/minloc1_4_i1.c
+++ b/libgfortran/generated/minloc1_4_i1.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_i1 (gfc_array_i4 * const restrict,
+extern void minloc1_4_i1 (gfc_array_i4 * const restrict,
gfc_array_i1 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_i1);
diff --git a/libgfortran/generated/minloc1_4_i16.c b/libgfortran/generated/minloc1_4_i16.c
index ab13d86291cd..9e757c7c80b6 100644
--- a/libgfortran/generated/minloc1_4_i16.c
+++ b/libgfortran/generated/minloc1_4_i16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_i16 (gfc_array_i4 * const restrict,
+extern void minloc1_4_i16 (gfc_array_i4 * const restrict,
gfc_array_i16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_i16);
diff --git a/libgfortran/generated/minloc1_4_i2.c b/libgfortran/generated/minloc1_4_i2.c
index 6af2662e0035..5e9b31ebfd28 100644
--- a/libgfortran/generated/minloc1_4_i2.c
+++ b/libgfortran/generated/minloc1_4_i2.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_i2 (gfc_array_i4 * const restrict,
+extern void minloc1_4_i2 (gfc_array_i4 * const restrict,
gfc_array_i2 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_i2);
diff --git a/libgfortran/generated/minloc1_4_i4.c b/libgfortran/generated/minloc1_4_i4.c
index c18cee9c9bd1..5563e668fcab 100644
--- a/libgfortran/generated/minloc1_4_i4.c
+++ b/libgfortran/generated/minloc1_4_i4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_i4 (gfc_array_i4 * const restrict,
+extern void minloc1_4_i4 (gfc_array_i4 * const restrict,
gfc_array_i4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_i4);
diff --git a/libgfortran/generated/minloc1_4_i8.c b/libgfortran/generated/minloc1_4_i8.c
index bb0897f85364..22040d4ce5e1 100644
--- a/libgfortran/generated/minloc1_4_i8.c
+++ b/libgfortran/generated/minloc1_4_i8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_i8 (gfc_array_i4 * const restrict,
+extern void minloc1_4_i8 (gfc_array_i4 * const restrict,
gfc_array_i8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_i8);
diff --git a/libgfortran/generated/minloc1_4_m1.c b/libgfortran/generated/minloc1_4_m1.c
index 18e22aa869ff..f01e3b4dee5d 100644
--- a/libgfortran/generated/minloc1_4_m1.c
+++ b/libgfortran/generated/minloc1_4_m1.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_m1 (gfc_array_i4 * const restrict,
+extern void minloc1_4_m1 (gfc_array_i4 * const restrict,
gfc_array_m1 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_m1);
diff --git a/libgfortran/generated/minloc1_4_m16.c b/libgfortran/generated/minloc1_4_m16.c
index 13f283399a95..24cb7828ad5f 100644
--- a/libgfortran/generated/minloc1_4_m16.c
+++ b/libgfortran/generated/minloc1_4_m16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_m16 (gfc_array_i4 * const restrict,
+extern void minloc1_4_m16 (gfc_array_i4 * const restrict,
gfc_array_m16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_m16);
diff --git a/libgfortran/generated/minloc1_4_m2.c b/libgfortran/generated/minloc1_4_m2.c
index ccdc26432359..b858b024bd65 100644
--- a/libgfortran/generated/minloc1_4_m2.c
+++ b/libgfortran/generated/minloc1_4_m2.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_m2 (gfc_array_i4 * const restrict,
+extern void minloc1_4_m2 (gfc_array_i4 * const restrict,
gfc_array_m2 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_m2);
diff --git a/libgfortran/generated/minloc1_4_m4.c b/libgfortran/generated/minloc1_4_m4.c
index 69c69220fc98..0159f930cd23 100644
--- a/libgfortran/generated/minloc1_4_m4.c
+++ b/libgfortran/generated/minloc1_4_m4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_m4 (gfc_array_i4 * const restrict,
+extern void minloc1_4_m4 (gfc_array_i4 * const restrict,
gfc_array_m4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_m4);
diff --git a/libgfortran/generated/minloc1_4_m8.c b/libgfortran/generated/minloc1_4_m8.c
index f46acdf3926c..0fd2096febd0 100644
--- a/libgfortran/generated/minloc1_4_m8.c
+++ b/libgfortran/generated/minloc1_4_m8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_m8 (gfc_array_i4 * const restrict,
+extern void minloc1_4_m8 (gfc_array_i4 * const restrict,
gfc_array_m8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_m8);
diff --git a/libgfortran/generated/minloc1_4_r10.c b/libgfortran/generated/minloc1_4_r10.c
index 56660aa11bca..11a59943f7a9 100644
--- a/libgfortran/generated/minloc1_4_r10.c
+++ b/libgfortran/generated/minloc1_4_r10.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_r10 (gfc_array_i4 * const restrict,
+extern void minloc1_4_r10 (gfc_array_i4 * const restrict,
gfc_array_r10 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_r10);
diff --git a/libgfortran/generated/minloc1_4_r16.c b/libgfortran/generated/minloc1_4_r16.c
index 03f98a65314e..81ce30f2bfb7 100644
--- a/libgfortran/generated/minloc1_4_r16.c
+++ b/libgfortran/generated/minloc1_4_r16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_r16 (gfc_array_i4 * const restrict,
+extern void minloc1_4_r16 (gfc_array_i4 * const restrict,
gfc_array_r16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_r16);
diff --git a/libgfortran/generated/minloc1_4_r17.c b/libgfortran/generated/minloc1_4_r17.c
index d5928a84bc9e..f6bc1356dcb8 100644
--- a/libgfortran/generated/minloc1_4_r17.c
+++ b/libgfortran/generated/minloc1_4_r17.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_r17 (gfc_array_i4 * const restrict,
+extern void minloc1_4_r17 (gfc_array_i4 * const restrict,
gfc_array_r17 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_r17);
diff --git a/libgfortran/generated/minloc1_4_r4.c b/libgfortran/generated/minloc1_4_r4.c
index bb5da76a0a28..188300e56c00 100644
--- a/libgfortran/generated/minloc1_4_r4.c
+++ b/libgfortran/generated/minloc1_4_r4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_r4 (gfc_array_i4 * const restrict,
+extern void minloc1_4_r4 (gfc_array_i4 * const restrict,
gfc_array_r4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_r4);
diff --git a/libgfortran/generated/minloc1_4_r8.c b/libgfortran/generated/minloc1_4_r8.c
index 76c6e8a65c49..838c76199008 100644
--- a/libgfortran/generated/minloc1_4_r8.c
+++ b/libgfortran/generated/minloc1_4_r8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_4_r8 (gfc_array_i4 * const restrict,
+extern void minloc1_4_r8 (gfc_array_i4 * const restrict,
gfc_array_r8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_4_r8);
diff --git a/libgfortran/generated/minloc1_4_s1.c b/libgfortran/generated/minloc1_4_s1.c
index 80476f7c3688..a4390fba967a 100644
--- a/libgfortran/generated/minloc1_4_s1.c
+++ b/libgfortran/generated/minloc1_4_s1.c
@@ -42,7 +42,7 @@ compare_fcn (const GFC_UINTEGER_1 *a, const GFC_UINTEGER_1 *b, gfc_charlen_type
return memcmp_char4 (a, b, n);
}
-extern void minloc1_4_s1 (gfc_array_i4 * const restrict,
+extern void minloc1_4_s1 (gfc_array_i4 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type);
export_proto(minloc1_4_s1);
@@ -207,7 +207,7 @@ minloc1_4_s1 (gfc_array_i4 * const restrict retarray,
}
-extern void mminloc1_4_s1 (gfc_array_i4 * const restrict,
+extern void mminloc1_4_s1 (gfc_array_i4 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict,
gfc_array_l1 * const restrict, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(mminloc1_4_s1);
@@ -413,7 +413,7 @@ mminloc1_4_s1 (gfc_array_i4 * const restrict retarray,
}
-extern void sminloc1_4_s1 (gfc_array_i4 * const restrict,
+extern void sminloc1_4_s1 (gfc_array_i4 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict,
GFC_LOGICAL_4 *, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(sminloc1_4_s1);
diff --git a/libgfortran/generated/minloc1_4_s4.c b/libgfortran/generated/minloc1_4_s4.c
index e92fde83cbde..359489bc0d9b 100644
--- a/libgfortran/generated/minloc1_4_s4.c
+++ b/libgfortran/generated/minloc1_4_s4.c
@@ -42,7 +42,7 @@ compare_fcn (const GFC_UINTEGER_4 *a, const GFC_UINTEGER_4 *b, gfc_charlen_type
return memcmp_char4 (a, b, n);
}
-extern void minloc1_4_s4 (gfc_array_i4 * const restrict,
+extern void minloc1_4_s4 (gfc_array_i4 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type);
export_proto(minloc1_4_s4);
@@ -207,7 +207,7 @@ minloc1_4_s4 (gfc_array_i4 * const restrict retarray,
}
-extern void mminloc1_4_s4 (gfc_array_i4 * const restrict,
+extern void mminloc1_4_s4 (gfc_array_i4 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict,
gfc_array_l1 * const restrict, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(mminloc1_4_s4);
@@ -413,7 +413,7 @@ mminloc1_4_s4 (gfc_array_i4 * const restrict retarray,
}
-extern void sminloc1_4_s4 (gfc_array_i4 * const restrict,
+extern void sminloc1_4_s4 (gfc_array_i4 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict,
GFC_LOGICAL_4 *, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(sminloc1_4_s4);
diff --git a/libgfortran/generated/minloc1_8_i1.c b/libgfortran/generated/minloc1_8_i1.c
index 66293dc84199..9d6dc0ef931d 100644
--- a/libgfortran/generated/minloc1_8_i1.c
+++ b/libgfortran/generated/minloc1_8_i1.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_i1 (gfc_array_i8 * const restrict,
+extern void minloc1_8_i1 (gfc_array_i8 * const restrict,
gfc_array_i1 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_i1);
diff --git a/libgfortran/generated/minloc1_8_i16.c b/libgfortran/generated/minloc1_8_i16.c
index 183fc91334b7..22297ffe0eef 100644
--- a/libgfortran/generated/minloc1_8_i16.c
+++ b/libgfortran/generated/minloc1_8_i16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_i16 (gfc_array_i8 * const restrict,
+extern void minloc1_8_i16 (gfc_array_i8 * const restrict,
gfc_array_i16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_i16);
diff --git a/libgfortran/generated/minloc1_8_i2.c b/libgfortran/generated/minloc1_8_i2.c
index d9176e68cd63..e74d136930e1 100644
--- a/libgfortran/generated/minloc1_8_i2.c
+++ b/libgfortran/generated/minloc1_8_i2.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_i2 (gfc_array_i8 * const restrict,
+extern void minloc1_8_i2 (gfc_array_i8 * const restrict,
gfc_array_i2 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_i2);
diff --git a/libgfortran/generated/minloc1_8_i4.c b/libgfortran/generated/minloc1_8_i4.c
index 6d70e90ad103..481572ef7d77 100644
--- a/libgfortran/generated/minloc1_8_i4.c
+++ b/libgfortran/generated/minloc1_8_i4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_i4 (gfc_array_i8 * const restrict,
+extern void minloc1_8_i4 (gfc_array_i8 * const restrict,
gfc_array_i4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_i4);
diff --git a/libgfortran/generated/minloc1_8_i8.c b/libgfortran/generated/minloc1_8_i8.c
index 99c01fdbd12f..f74051a7917d 100644
--- a/libgfortran/generated/minloc1_8_i8.c
+++ b/libgfortran/generated/minloc1_8_i8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_i8 (gfc_array_i8 * const restrict,
+extern void minloc1_8_i8 (gfc_array_i8 * const restrict,
gfc_array_i8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_i8);
diff --git a/libgfortran/generated/minloc1_8_m1.c b/libgfortran/generated/minloc1_8_m1.c
index 8cbd930e060e..b17dc4c23afd 100644
--- a/libgfortran/generated/minloc1_8_m1.c
+++ b/libgfortran/generated/minloc1_8_m1.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_m1 (gfc_array_i8 * const restrict,
+extern void minloc1_8_m1 (gfc_array_i8 * const restrict,
gfc_array_m1 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_m1);
diff --git a/libgfortran/generated/minloc1_8_m16.c b/libgfortran/generated/minloc1_8_m16.c
index 9eeeea4fa12e..7dba9b72a79c 100644
--- a/libgfortran/generated/minloc1_8_m16.c
+++ b/libgfortran/generated/minloc1_8_m16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_m16 (gfc_array_i8 * const restrict,
+extern void minloc1_8_m16 (gfc_array_i8 * const restrict,
gfc_array_m16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_m16);
diff --git a/libgfortran/generated/minloc1_8_m2.c b/libgfortran/generated/minloc1_8_m2.c
index 8b3b31f105cb..08b20de2c660 100644
--- a/libgfortran/generated/minloc1_8_m2.c
+++ b/libgfortran/generated/minloc1_8_m2.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_m2 (gfc_array_i8 * const restrict,
+extern void minloc1_8_m2 (gfc_array_i8 * const restrict,
gfc_array_m2 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_m2);
diff --git a/libgfortran/generated/minloc1_8_m4.c b/libgfortran/generated/minloc1_8_m4.c
index 236eacd6b550..703cd80434a9 100644
--- a/libgfortran/generated/minloc1_8_m4.c
+++ b/libgfortran/generated/minloc1_8_m4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_m4 (gfc_array_i8 * const restrict,
+extern void minloc1_8_m4 (gfc_array_i8 * const restrict,
gfc_array_m4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_m4);
diff --git a/libgfortran/generated/minloc1_8_m8.c b/libgfortran/generated/minloc1_8_m8.c
index 496b38dc0ddd..9e87b9712a90 100644
--- a/libgfortran/generated/minloc1_8_m8.c
+++ b/libgfortran/generated/minloc1_8_m8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_m8 (gfc_array_i8 * const restrict,
+extern void minloc1_8_m8 (gfc_array_i8 * const restrict,
gfc_array_m8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_m8);
diff --git a/libgfortran/generated/minloc1_8_r10.c b/libgfortran/generated/minloc1_8_r10.c
index 0924b9a8af86..0d5d77268590 100644
--- a/libgfortran/generated/minloc1_8_r10.c
+++ b/libgfortran/generated/minloc1_8_r10.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_r10 (gfc_array_i8 * const restrict,
+extern void minloc1_8_r10 (gfc_array_i8 * const restrict,
gfc_array_r10 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_r10);
diff --git a/libgfortran/generated/minloc1_8_r16.c b/libgfortran/generated/minloc1_8_r16.c
index 649cbe492e14..cfc847847093 100644
--- a/libgfortran/generated/minloc1_8_r16.c
+++ b/libgfortran/generated/minloc1_8_r16.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_r16 (gfc_array_i8 * const restrict,
+extern void minloc1_8_r16 (gfc_array_i8 * const restrict,
gfc_array_r16 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_r16);
diff --git a/libgfortran/generated/minloc1_8_r17.c b/libgfortran/generated/minloc1_8_r17.c
index 5b39bb01bfb1..2a50593dcae7 100644
--- a/libgfortran/generated/minloc1_8_r17.c
+++ b/libgfortran/generated/minloc1_8_r17.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_r17 (gfc_array_i8 * const restrict,
+extern void minloc1_8_r17 (gfc_array_i8 * const restrict,
gfc_array_r17 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_r17);
diff --git a/libgfortran/generated/minloc1_8_r4.c b/libgfortran/generated/minloc1_8_r4.c
index 6a5facabe246..fd303d06ef29 100644
--- a/libgfortran/generated/minloc1_8_r4.c
+++ b/libgfortran/generated/minloc1_8_r4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_r4 (gfc_array_i8 * const restrict,
+extern void minloc1_8_r4 (gfc_array_i8 * const restrict,
gfc_array_r4 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_r4);
diff --git a/libgfortran/generated/minloc1_8_r8.c b/libgfortran/generated/minloc1_8_r8.c
index e8894edb69db..30d9eaea263a 100644
--- a/libgfortran/generated/minloc1_8_r8.c
+++ b/libgfortran/generated/minloc1_8_r8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define HAVE_BACK_ARG 1
-extern void minloc1_8_r8 (gfc_array_i8 * const restrict,
+extern void minloc1_8_r8 (gfc_array_i8 * const restrict,
gfc_array_r8 * const restrict, const index_type * const restrict, GFC_LOGICAL_4 back);
export_proto(minloc1_8_r8);
diff --git a/libgfortran/generated/minloc1_8_s1.c b/libgfortran/generated/minloc1_8_s1.c
index b0c971b86145..72987cd0ac06 100644
--- a/libgfortran/generated/minloc1_8_s1.c
+++ b/libgfortran/generated/minloc1_8_s1.c
@@ -42,7 +42,7 @@ compare_fcn (const GFC_UINTEGER_1 *a, const GFC_UINTEGER_1 *b, gfc_charlen_type
return memcmp_char4 (a, b, n);
}
-extern void minloc1_8_s1 (gfc_array_i8 * const restrict,
+extern void minloc1_8_s1 (gfc_array_i8 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type);
export_proto(minloc1_8_s1);
@@ -207,7 +207,7 @@ minloc1_8_s1 (gfc_array_i8 * const restrict retarray,
}
-extern void mminloc1_8_s1 (gfc_array_i8 * const restrict,
+extern void mminloc1_8_s1 (gfc_array_i8 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict,
gfc_array_l1 * const restrict, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(mminloc1_8_s1);
@@ -413,7 +413,7 @@ mminloc1_8_s1 (gfc_array_i8 * const restrict retarray,
}
-extern void sminloc1_8_s1 (gfc_array_i8 * const restrict,
+extern void sminloc1_8_s1 (gfc_array_i8 * const restrict,
gfc_array_s1 * const restrict, const index_type * const restrict,
GFC_LOGICAL_4 *, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(sminloc1_8_s1);
diff --git a/libgfortran/generated/minloc1_8_s4.c b/libgfortran/generated/minloc1_8_s4.c
index 425c5f639efa..04e1b02fa189 100644
--- a/libgfortran/generated/minloc1_8_s4.c
+++ b/libgfortran/generated/minloc1_8_s4.c
@@ -42,7 +42,7 @@ compare_fcn (const GFC_UINTEGER_4 *a, const GFC_UINTEGER_4 *b, gfc_charlen_type
return memcmp_char4 (a, b, n);
}
-extern void minloc1_8_s4 (gfc_array_i8 * const restrict,
+extern void minloc1_8_s4 (gfc_array_i8 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict , GFC_LOGICAL_4 back,
gfc_charlen_type);
export_proto(minloc1_8_s4);
@@ -207,7 +207,7 @@ minloc1_8_s4 (gfc_array_i8 * const restrict retarray,
}
-extern void mminloc1_8_s4 (gfc_array_i8 * const restrict,
+extern void mminloc1_8_s4 (gfc_array_i8 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict,
gfc_array_l1 * const restrict, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(mminloc1_8_s4);
@@ -413,7 +413,7 @@ mminloc1_8_s4 (gfc_array_i8 * const restrict retarray,
}
-extern void sminloc1_8_s4 (gfc_array_i8 * const restrict,
+extern void sminloc1_8_s4 (gfc_array_i8 * const restrict,
gfc_array_s4 * const restrict, const index_type * const restrict,
GFC_LOGICAL_4 *, GFC_LOGICAL_4 back, gfc_charlen_type);
export_proto(sminloc1_8_s4);
diff --git a/libgfortran/generated/minval1_s1.c b/libgfortran/generated/minval1_s1.c
index 6f096dadc33c..527af9e9b70e 100644
--- a/libgfortran/generated/minval1_s1.c
+++ b/libgfortran/generated/minval1_s1.c
@@ -46,8 +46,8 @@ extern void minval1_s1 (gfc_array_s1 * const restrict,
export_proto(minval1_s1);
void
-minval1_s1 (gfc_array_s1 * const restrict retarray,
- gfc_charlen_type xlen, gfc_array_s1 * const restrict array,
+minval1_s1 (gfc_array_s1 * const restrict retarray,
+ gfc_charlen_type xlen, gfc_array_s1 * const restrict array,
const index_type * const restrict pdim, gfc_charlen_type string_len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -210,8 +210,8 @@ extern void mminval1_s1 (gfc_array_s1 * const restrict,
export_proto(mminval1_s1);
void
-mminval1_s1 (gfc_array_s1 * const restrict retarray,
- gfc_charlen_type xlen, gfc_array_s1 * const restrict array,
+mminval1_s1 (gfc_array_s1 * const restrict retarray,
+ gfc_charlen_type xlen, gfc_array_s1 * const restrict array,
const index_type * const restrict pdim,
gfc_array_l1 * const restrict mask,
gfc_charlen_type string_len)
@@ -414,8 +414,8 @@ void sminval1_s1 (gfc_array_s1 * const restrict,
export_proto(sminval1_s1);
void
-sminval1_s1 (gfc_array_s1 * const restrict retarray,
- gfc_charlen_type xlen, gfc_array_s1 * const restrict array,
+sminval1_s1 (gfc_array_s1 * const restrict retarray,
+ gfc_charlen_type xlen, gfc_array_s1 * const restrict array,
const index_type * const restrict pdim,
GFC_LOGICAL_4 *mask, gfc_charlen_type string_len)
diff --git a/libgfortran/generated/minval1_s4.c b/libgfortran/generated/minval1_s4.c
index ece0bdd364d1..439d5f400fd2 100644
--- a/libgfortran/generated/minval1_s4.c
+++ b/libgfortran/generated/minval1_s4.c
@@ -46,8 +46,8 @@ extern void minval1_s4 (gfc_array_s4 * const restrict,
export_proto(minval1_s4);
void
-minval1_s4 (gfc_array_s4 * const restrict retarray,
- gfc_charlen_type xlen, gfc_array_s4 * const restrict array,
+minval1_s4 (gfc_array_s4 * const restrict retarray,
+ gfc_charlen_type xlen, gfc_array_s4 * const restrict array,
const index_type * const restrict pdim, gfc_charlen_type string_len)
{
index_type count[GFC_MAX_DIMENSIONS];
@@ -210,8 +210,8 @@ extern void mminval1_s4 (gfc_array_s4 * const restrict,
export_proto(mminval1_s4);
void
-mminval1_s4 (gfc_array_s4 * const restrict retarray,
- gfc_charlen_type xlen, gfc_array_s4 * const restrict array,
+mminval1_s4 (gfc_array_s4 * const restrict retarray,
+ gfc_charlen_type xlen, gfc_array_s4 * const restrict array,
const index_type * const restrict pdim,
gfc_array_l1 * const restrict mask,
gfc_charlen_type string_len)
@@ -414,8 +414,8 @@ void sminval1_s4 (gfc_array_s4 * const restrict,
export_proto(sminval1_s4);
void
-sminval1_s4 (gfc_array_s4 * const restrict retarray,
- gfc_charlen_type xlen, gfc_array_s4 * const restrict array,
+sminval1_s4 (gfc_array_s4 * const restrict retarray,
+ gfc_charlen_type xlen, gfc_array_s4 * const restrict array,
const index_type * const restrict pdim,
GFC_LOGICAL_4 *mask, gfc_charlen_type string_len)
diff --git a/libgfortran/generated/minval_i1.c b/libgfortran/generated/minval_i1.c
index 26df2c29ee5f..218a8c578247 100644
--- a/libgfortran/generated/minval_i1.c
+++ b/libgfortran/generated/minval_i1.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_1) && defined (HAVE_GFC_INTEGER_1)
-extern void minval_i1 (gfc_array_i1 * const restrict,
+extern void minval_i1 (gfc_array_i1 * const restrict,
gfc_array_i1 * const restrict, const index_type * const restrict);
export_proto(minval_i1);
diff --git a/libgfortran/generated/minval_i16.c b/libgfortran/generated/minval_i16.c
index f5637f22e2de..f8e52710263b 100644
--- a/libgfortran/generated/minval_i16.c
+++ b/libgfortran/generated/minval_i16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_16) && defined (HAVE_GFC_INTEGER_16)
-extern void minval_i16 (gfc_array_i16 * const restrict,
+extern void minval_i16 (gfc_array_i16 * const restrict,
gfc_array_i16 * const restrict, const index_type * const restrict);
export_proto(minval_i16);
diff --git a/libgfortran/generated/minval_i2.c b/libgfortran/generated/minval_i2.c
index 00356d1a68ce..2c4204185cc0 100644
--- a/libgfortran/generated/minval_i2.c
+++ b/libgfortran/generated/minval_i2.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_2) && defined (HAVE_GFC_INTEGER_2)
-extern void minval_i2 (gfc_array_i2 * const restrict,
+extern void minval_i2 (gfc_array_i2 * const restrict,
gfc_array_i2 * const restrict, const index_type * const restrict);
export_proto(minval_i2);
diff --git a/libgfortran/generated/minval_i4.c b/libgfortran/generated/minval_i4.c
index a0c2993295c0..b55ab81efb78 100644
--- a/libgfortran/generated/minval_i4.c
+++ b/libgfortran/generated/minval_i4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_4) && defined (HAVE_GFC_INTEGER_4)
-extern void minval_i4 (gfc_array_i4 * const restrict,
+extern void minval_i4 (gfc_array_i4 * const restrict,
gfc_array_i4 * const restrict, const index_type * const restrict);
export_proto(minval_i4);
diff --git a/libgfortran/generated/minval_i8.c b/libgfortran/generated/minval_i8.c
index 4db5c489e95f..6930854a8984 100644
--- a/libgfortran/generated/minval_i8.c
+++ b/libgfortran/generated/minval_i8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_INTEGER_8) && defined (HAVE_GFC_INTEGER_8)
-extern void minval_i8 (gfc_array_i8 * const restrict,
+extern void minval_i8 (gfc_array_i8 * const restrict,
gfc_array_i8 * const restrict, const index_type * const restrict);
export_proto(minval_i8);
diff --git a/libgfortran/generated/minval_m1.c b/libgfortran/generated/minval_m1.c
index 9b9828eb2884..3c306599954a 100644
--- a/libgfortran/generated/minval_m1.c
+++ b/libgfortran/generated/minval_m1.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_1) && defined (HAVE_GFC_UINTEGER_1)
-extern void minval_m1 (gfc_array_m1 * const restrict,
+extern void minval_m1 (gfc_array_m1 * const restrict,
gfc_array_m1 * const restrict, const index_type * const restrict);
export_proto(minval_m1);
diff --git a/libgfortran/generated/minval_m16.c b/libgfortran/generated/minval_m16.c
index 6ec7d8cbc6c4..ba1ea699f170 100644
--- a/libgfortran/generated/minval_m16.c
+++ b/libgfortran/generated/minval_m16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_16) && defined (HAVE_GFC_UINTEGER_16)
-extern void minval_m16 (gfc_array_m16 * const restrict,
+extern void minval_m16 (gfc_array_m16 * const restrict,
gfc_array_m16 * const restrict, const index_type * const restrict);
export_proto(minval_m16);
diff --git a/libgfortran/generated/minval_m2.c b/libgfortran/generated/minval_m2.c
index 96e3e7e9b690..89f869eb5c6e 100644
--- a/libgfortran/generated/minval_m2.c
+++ b/libgfortran/generated/minval_m2.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_2) && defined (HAVE_GFC_UINTEGER_2)
-extern void minval_m2 (gfc_array_m2 * const restrict,
+extern void minval_m2 (gfc_array_m2 * const restrict,
gfc_array_m2 * const restrict, const index_type * const restrict);
export_proto(minval_m2);
diff --git a/libgfortran/generated/minval_m4.c b/libgfortran/generated/minval_m4.c
index 5da91550db13..edeeef451a99 100644
--- a/libgfortran/generated/minval_m4.c
+++ b/libgfortran/generated/minval_m4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_4) && defined (HAVE_GFC_UINTEGER_4)
-extern void minval_m4 (gfc_array_m4 * const restrict,
+extern void minval_m4 (gfc_array_m4 * const restrict,
gfc_array_m4 * const restrict, const index_type * const restrict);
export_proto(minval_m4);
diff --git a/libgfortran/generated/minval_m8.c b/libgfortran/generated/minval_m8.c
index 96deef06204e..9185ef5823a9 100644
--- a/libgfortran/generated/minval_m8.c
+++ b/libgfortran/generated/minval_m8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_8) && defined (HAVE_GFC_UINTEGER_8)
-extern void minval_m8 (gfc_array_m8 * const restrict,
+extern void minval_m8 (gfc_array_m8 * const restrict,
gfc_array_m8 * const restrict, const index_type * const restrict);
export_proto(minval_m8);
diff --git a/libgfortran/generated/minval_r10.c b/libgfortran/generated/minval_r10.c
index 218f9e4380b3..10883b39e309 100644
--- a/libgfortran/generated/minval_r10.c
+++ b/libgfortran/generated/minval_r10.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_10) && defined (HAVE_GFC_REAL_10)
-extern void minval_r10 (gfc_array_r10 * const restrict,
+extern void minval_r10 (gfc_array_r10 * const restrict,
gfc_array_r10 * const restrict, const index_type * const restrict);
export_proto(minval_r10);
diff --git a/libgfortran/generated/minval_r16.c b/libgfortran/generated/minval_r16.c
index 7b73b028314a..17e02d17f947 100644
--- a/libgfortran/generated/minval_r16.c
+++ b/libgfortran/generated/minval_r16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_16) && defined (HAVE_GFC_REAL_16)
-extern void minval_r16 (gfc_array_r16 * const restrict,
+extern void minval_r16 (gfc_array_r16 * const restrict,
gfc_array_r16 * const restrict, const index_type * const restrict);
export_proto(minval_r16);
diff --git a/libgfortran/generated/minval_r17.c b/libgfortran/generated/minval_r17.c
index 7ffe433eccf7..835605d3e789 100644
--- a/libgfortran/generated/minval_r17.c
+++ b/libgfortran/generated/minval_r17.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_17) && defined (HAVE_GFC_REAL_17)
-extern void minval_r17 (gfc_array_r17 * const restrict,
+extern void minval_r17 (gfc_array_r17 * const restrict,
gfc_array_r17 * const restrict, const index_type * const restrict);
export_proto(minval_r17);
diff --git a/libgfortran/generated/minval_r4.c b/libgfortran/generated/minval_r4.c
index 997676c0f24f..d0a25334f747 100644
--- a/libgfortran/generated/minval_r4.c
+++ b/libgfortran/generated/minval_r4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_4) && defined (HAVE_GFC_REAL_4)
-extern void minval_r4 (gfc_array_r4 * const restrict,
+extern void minval_r4 (gfc_array_r4 * const restrict,
gfc_array_r4 * const restrict, const index_type * const restrict);
export_proto(minval_r4);
diff --git a/libgfortran/generated/minval_r8.c b/libgfortran/generated/minval_r8.c
index 79a9f956a9ab..b8cb04c8f19f 100644
--- a/libgfortran/generated/minval_r8.c
+++ b/libgfortran/generated/minval_r8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_8) && defined (HAVE_GFC_REAL_8)
-extern void minval_r8 (gfc_array_r8 * const restrict,
+extern void minval_r8 (gfc_array_r8 * const restrict,
gfc_array_r8 * const restrict, const index_type * const restrict);
export_proto(minval_r8);
diff --git a/libgfortran/generated/norm2_r10.c b/libgfortran/generated/norm2_r10.c
index d43266d55c44..3afc127c7937 100644
--- a/libgfortran/generated/norm2_r10.c
+++ b/libgfortran/generated/norm2_r10.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define MATHFUNC(funcname) funcname ## l
-extern void norm2_r10 (gfc_array_r10 * const restrict,
+extern void norm2_r10 (gfc_array_r10 * const restrict,
gfc_array_r10 * const restrict, const index_type * const restrict);
export_proto(norm2_r10);
diff --git a/libgfortran/generated/norm2_r16.c b/libgfortran/generated/norm2_r16.c
index 2c1fcfc1eee9..5e1ac003c928 100644
--- a/libgfortran/generated/norm2_r16.c
+++ b/libgfortran/generated/norm2_r16.c
@@ -40,7 +40,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#endif
-extern void norm2_r16 (gfc_array_r16 * const restrict,
+extern void norm2_r16 (gfc_array_r16 * const restrict,
gfc_array_r16 * const restrict, const index_type * const restrict);
export_proto(norm2_r16);
diff --git a/libgfortran/generated/norm2_r17.c b/libgfortran/generated/norm2_r17.c
index 17eac4e41626..37e5a89cc72c 100644
--- a/libgfortran/generated/norm2_r17.c
+++ b/libgfortran/generated/norm2_r17.c
@@ -38,7 +38,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#endif
-extern void norm2_r17 (gfc_array_r17 * const restrict,
+extern void norm2_r17 (gfc_array_r17 * const restrict,
gfc_array_r17 * const restrict, const index_type * const restrict);
export_proto(norm2_r17);
diff --git a/libgfortran/generated/norm2_r4.c b/libgfortran/generated/norm2_r4.c
index f24d8ac2e0fd..71e2e8bd0abe 100644
--- a/libgfortran/generated/norm2_r4.c
+++ b/libgfortran/generated/norm2_r4.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define MATHFUNC(funcname) funcname ## f
-extern void norm2_r4 (gfc_array_r4 * const restrict,
+extern void norm2_r4 (gfc_array_r4 * const restrict,
gfc_array_r4 * const restrict, const index_type * const restrict);
export_proto(norm2_r4);
diff --git a/libgfortran/generated/norm2_r8.c b/libgfortran/generated/norm2_r8.c
index a2d89b15c43b..c7d162c5462e 100644
--- a/libgfortran/generated/norm2_r8.c
+++ b/libgfortran/generated/norm2_r8.c
@@ -32,7 +32,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#define MATHFUNC(funcname) funcname
-extern void norm2_r8 (gfc_array_r8 * const restrict,
+extern void norm2_r8 (gfc_array_r8 * const restrict,
gfc_array_r8 * const restrict, const index_type * const restrict);
export_proto(norm2_r8);
diff --git a/libgfortran/generated/parity_l1.c b/libgfortran/generated/parity_l1.c
index a1ba22f60f9a..34fcc030181c 100644
--- a/libgfortran/generated/parity_l1.c
+++ b/libgfortran/generated/parity_l1.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_1) && defined (HAVE_GFC_LOGICAL_1)
-extern void parity_l1 (gfc_array_l1 * const restrict,
+extern void parity_l1 (gfc_array_l1 * const restrict,
gfc_array_l1 * const restrict, const index_type * const restrict);
export_proto(parity_l1);
diff --git a/libgfortran/generated/parity_l16.c b/libgfortran/generated/parity_l16.c
index 341f3cf1f855..0fcf886664ff 100644
--- a/libgfortran/generated/parity_l16.c
+++ b/libgfortran/generated/parity_l16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_16) && defined (HAVE_GFC_LOGICAL_16)
-extern void parity_l16 (gfc_array_l16 * const restrict,
+extern void parity_l16 (gfc_array_l16 * const restrict,
gfc_array_l16 * const restrict, const index_type * const restrict);
export_proto(parity_l16);
diff --git a/libgfortran/generated/parity_l2.c b/libgfortran/generated/parity_l2.c
index a986ed317402..4abafb425af0 100644
--- a/libgfortran/generated/parity_l2.c
+++ b/libgfortran/generated/parity_l2.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_2) && defined (HAVE_GFC_LOGICAL_2)
-extern void parity_l2 (gfc_array_l2 * const restrict,
+extern void parity_l2 (gfc_array_l2 * const restrict,
gfc_array_l2 * const restrict, const index_type * const restrict);
export_proto(parity_l2);
diff --git a/libgfortran/generated/parity_l4.c b/libgfortran/generated/parity_l4.c
index de3537aaf376..1f18aab1ba79 100644
--- a/libgfortran/generated/parity_l4.c
+++ b/libgfortran/generated/parity_l4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_4) && defined (HAVE_GFC_LOGICAL_4)
-extern void parity_l4 (gfc_array_l4 * const restrict,
+extern void parity_l4 (gfc_array_l4 * const restrict,
gfc_array_l4 * const restrict, const index_type * const restrict);
export_proto(parity_l4);
diff --git a/libgfortran/generated/parity_l8.c b/libgfortran/generated/parity_l8.c
index 693059839de6..a0c382a1f961 100644
--- a/libgfortran/generated/parity_l8.c
+++ b/libgfortran/generated/parity_l8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_LOGICAL_8) && defined (HAVE_GFC_LOGICAL_8)
-extern void parity_l8 (gfc_array_l8 * const restrict,
+extern void parity_l8 (gfc_array_l8 * const restrict,
gfc_array_l8 * const restrict, const index_type * const restrict);
export_proto(parity_l8);
diff --git a/libgfortran/generated/product_c10.c b/libgfortran/generated/product_c10.c
index 270d125ba072..305584c5d1ba 100644
--- a/libgfortran/generated/product_c10.c
+++ b/libgfortran/generated/product_c10.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_COMPLEX_10) && defined (HAVE_GFC_COMPLEX_10)
-extern void product_c10 (gfc_array_c10 * const restrict,
+extern void product_c10 (gfc_array_c10 * const restrict,
gfc_array_c10 * const restrict, const index_type * const restrict);
export_proto(product_c10);
diff --git a/libgfortran/generated/product_c16.c b/libgfortran/generated/product_c16.c
index c0f13f0adfa8..f8ccf0d65c93 100644
--- a/libgfortran/generated/product_c16.c
+++ b/libgfortran/generated/product_c16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_COMPLEX_16) && defined (HAVE_GFC_COMPLEX_16)
-extern void product_c16 (gfc_array_c16 * const restrict,
+extern void product_c16 (gfc_array_c16 * const restrict,
gfc_array_c16 * const restrict, const index_type * const restrict);
export_proto(product_c16);
diff --git a/libgfortran/generated/product_c17.c b/libgfortran/generated/product_c17.c
index fb5667fd67bc..734ea1f2f955 100644
--- a/libgfortran/generated/product_c17.c
+++ b/libgfortran/generated/product_c17.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_COMPLEX_17) && defined (HAVE_GFC_COMPLEX_17)
-extern void product_c17 (gfc_array_c17 * const restrict,
+extern void product_c17 (gfc_array_c17 * const restrict,
gfc_array_c17 * const restrict, const index_type * const restrict);
export_proto(product_c17);
diff --git a/libgfortran/generated/product_c4.c b/libgfortran/generated/product_c4.c
index d371241aab2e..20a23786ecde 100644
--- a/libgfortran/generated/product_c4.c
+++ b/libgfortran/generated/product_c4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_COMPLEX_4) && defined (HAVE_GFC_COMPLEX_4)
-extern void product_c4 (gfc_array_c4 * const restrict,
+extern void product_c4 (gfc_array_c4 * const restrict,
gfc_array_c4 * const restrict, const index_type * const restrict);
export_proto(product_c4);
diff --git a/libgfortran/generated/product_c8.c b/libgfortran/generated/product_c8.c
index 0f65229f28e9..f1e4f1e083fe 100644
--- a/libgfortran/generated/product_c8.c
+++ b/libgfortran/generated/product_c8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_COMPLEX_8) && defined (HAVE_GFC_COMPLEX_8)
-extern void product_c8 (gfc_array_c8 * const restrict,
+extern void product_c8 (gfc_array_c8 * const restrict,
gfc_array_c8 * const restrict, const index_type * const restrict);
export_proto(product_c8);
diff --git a/libgfortran/generated/product_i1.c b/libgfortran/generated/product_i1.c
index 73e6fe837c4a..df025e92090a 100644
--- a/libgfortran/generated/product_i1.c
+++ b/libgfortran/generated/product_i1.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_1) && defined (HAVE_GFC_UINTEGER_1)
-extern void product_i1 (gfc_array_m1 * const restrict,
+extern void product_i1 (gfc_array_m1 * const restrict,
gfc_array_m1 * const restrict, const index_type * const restrict);
export_proto(product_i1);
diff --git a/libgfortran/generated/product_i16.c b/libgfortran/generated/product_i16.c
index f34f6b61e19a..991841002f26 100644
--- a/libgfortran/generated/product_i16.c
+++ b/libgfortran/generated/product_i16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_16) && defined (HAVE_GFC_UINTEGER_16)
-extern void product_i16 (gfc_array_m16 * const restrict,
+extern void product_i16 (gfc_array_m16 * const restrict,
gfc_array_m16 * const restrict, const index_type * const restrict);
export_proto(product_i16);
diff --git a/libgfortran/generated/product_i2.c b/libgfortran/generated/product_i2.c
index a51354d26c82..9be3f8c50935 100644
--- a/libgfortran/generated/product_i2.c
+++ b/libgfortran/generated/product_i2.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_2) && defined (HAVE_GFC_UINTEGER_2)
-extern void product_i2 (gfc_array_m2 * const restrict,
+extern void product_i2 (gfc_array_m2 * const restrict,
gfc_array_m2 * const restrict, const index_type * const restrict);
export_proto(product_i2);
diff --git a/libgfortran/generated/product_i4.c b/libgfortran/generated/product_i4.c
index d77308f8cb92..c1c454a92f12 100644
--- a/libgfortran/generated/product_i4.c
+++ b/libgfortran/generated/product_i4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_4) && defined (HAVE_GFC_UINTEGER_4)
-extern void product_i4 (gfc_array_m4 * const restrict,
+extern void product_i4 (gfc_array_m4 * const restrict,
gfc_array_m4 * const restrict, const index_type * const restrict);
export_proto(product_i4);
diff --git a/libgfortran/generated/product_i8.c b/libgfortran/generated/product_i8.c
index eac2b32a079b..03003883f70c 100644
--- a/libgfortran/generated/product_i8.c
+++ b/libgfortran/generated/product_i8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_8) && defined (HAVE_GFC_UINTEGER_8)
-extern void product_i8 (gfc_array_m8 * const restrict,
+extern void product_i8 (gfc_array_m8 * const restrict,
gfc_array_m8 * const restrict, const index_type * const restrict);
export_proto(product_i8);
diff --git a/libgfortran/generated/product_r10.c b/libgfortran/generated/product_r10.c
index d8e2798815c3..06c63769991c 100644
--- a/libgfortran/generated/product_r10.c
+++ b/libgfortran/generated/product_r10.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_10) && defined (HAVE_GFC_REAL_10)
-extern void product_r10 (gfc_array_r10 * const restrict,
+extern void product_r10 (gfc_array_r10 * const restrict,
gfc_array_r10 * const restrict, const index_type * const restrict);
export_proto(product_r10);
diff --git a/libgfortran/generated/product_r16.c b/libgfortran/generated/product_r16.c
index 92a93ab0badb..ecdd3864fe12 100644
--- a/libgfortran/generated/product_r16.c
+++ b/libgfortran/generated/product_r16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_16) && defined (HAVE_GFC_REAL_16)
-extern void product_r16 (gfc_array_r16 * const restrict,
+extern void product_r16 (gfc_array_r16 * const restrict,
gfc_array_r16 * const restrict, const index_type * const restrict);
export_proto(product_r16);
diff --git a/libgfortran/generated/product_r17.c b/libgfortran/generated/product_r17.c
index 834cbcf942b4..640f0333f421 100644
--- a/libgfortran/generated/product_r17.c
+++ b/libgfortran/generated/product_r17.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_17) && defined (HAVE_GFC_REAL_17)
-extern void product_r17 (gfc_array_r17 * const restrict,
+extern void product_r17 (gfc_array_r17 * const restrict,
gfc_array_r17 * const restrict, const index_type * const restrict);
export_proto(product_r17);
diff --git a/libgfortran/generated/product_r4.c b/libgfortran/generated/product_r4.c
index 3b50c0df4783..e1cdd96f6fac 100644
--- a/libgfortran/generated/product_r4.c
+++ b/libgfortran/generated/product_r4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_4) && defined (HAVE_GFC_REAL_4)
-extern void product_r4 (gfc_array_r4 * const restrict,
+extern void product_r4 (gfc_array_r4 * const restrict,
gfc_array_r4 * const restrict, const index_type * const restrict);
export_proto(product_r4);
diff --git a/libgfortran/generated/product_r8.c b/libgfortran/generated/product_r8.c
index 85e9a065daf3..d291ef062ce9 100644
--- a/libgfortran/generated/product_r8.c
+++ b/libgfortran/generated/product_r8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_8) && defined (HAVE_GFC_REAL_8)
-extern void product_r8 (gfc_array_r8 * const restrict,
+extern void product_r8 (gfc_array_r8 * const restrict,
gfc_array_r8 * const restrict, const index_type * const restrict);
export_proto(product_r8);
diff --git a/libgfortran/generated/sum_c10.c b/libgfortran/generated/sum_c10.c
index df90ec87a83c..f085e72ff233 100644
--- a/libgfortran/generated/sum_c10.c
+++ b/libgfortran/generated/sum_c10.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_COMPLEX_10) && defined (HAVE_GFC_COMPLEX_10)
-extern void sum_c10 (gfc_array_c10 * const restrict,
+extern void sum_c10 (gfc_array_c10 * const restrict,
gfc_array_c10 * const restrict, const index_type * const restrict);
export_proto(sum_c10);
diff --git a/libgfortran/generated/sum_c16.c b/libgfortran/generated/sum_c16.c
index b3f6a97dd4e8..258c3745a9d5 100644
--- a/libgfortran/generated/sum_c16.c
+++ b/libgfortran/generated/sum_c16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_COMPLEX_16) && defined (HAVE_GFC_COMPLEX_16)
-extern void sum_c16 (gfc_array_c16 * const restrict,
+extern void sum_c16 (gfc_array_c16 * const restrict,
gfc_array_c16 * const restrict, const index_type * const restrict);
export_proto(sum_c16);
diff --git a/libgfortran/generated/sum_c17.c b/libgfortran/generated/sum_c17.c
index 9f84c968270b..8d9b949e6907 100644
--- a/libgfortran/generated/sum_c17.c
+++ b/libgfortran/generated/sum_c17.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_COMPLEX_17) && defined (HAVE_GFC_COMPLEX_17)
-extern void sum_c17 (gfc_array_c17 * const restrict,
+extern void sum_c17 (gfc_array_c17 * const restrict,
gfc_array_c17 * const restrict, const index_type * const restrict);
export_proto(sum_c17);
diff --git a/libgfortran/generated/sum_c4.c b/libgfortran/generated/sum_c4.c
index af1de3fd4c03..8b436cccb448 100644
--- a/libgfortran/generated/sum_c4.c
+++ b/libgfortran/generated/sum_c4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_COMPLEX_4) && defined (HAVE_GFC_COMPLEX_4)
-extern void sum_c4 (gfc_array_c4 * const restrict,
+extern void sum_c4 (gfc_array_c4 * const restrict,
gfc_array_c4 * const restrict, const index_type * const restrict);
export_proto(sum_c4);
diff --git a/libgfortran/generated/sum_c8.c b/libgfortran/generated/sum_c8.c
index 5f9f12fef8e8..701018c796b2 100644
--- a/libgfortran/generated/sum_c8.c
+++ b/libgfortran/generated/sum_c8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_COMPLEX_8) && defined (HAVE_GFC_COMPLEX_8)
-extern void sum_c8 (gfc_array_c8 * const restrict,
+extern void sum_c8 (gfc_array_c8 * const restrict,
gfc_array_c8 * const restrict, const index_type * const restrict);
export_proto(sum_c8);
diff --git a/libgfortran/generated/sum_i1.c b/libgfortran/generated/sum_i1.c
index e51ac052e840..e68dabbb5a53 100644
--- a/libgfortran/generated/sum_i1.c
+++ b/libgfortran/generated/sum_i1.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_1) && defined (HAVE_GFC_UINTEGER_1)
-extern void sum_i1 (gfc_array_m1 * const restrict,
+extern void sum_i1 (gfc_array_m1 * const restrict,
gfc_array_m1 * const restrict, const index_type * const restrict);
export_proto(sum_i1);
diff --git a/libgfortran/generated/sum_i16.c b/libgfortran/generated/sum_i16.c
index 15eeecc7deb7..b8997f6db148 100644
--- a/libgfortran/generated/sum_i16.c
+++ b/libgfortran/generated/sum_i16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_16) && defined (HAVE_GFC_UINTEGER_16)
-extern void sum_i16 (gfc_array_m16 * const restrict,
+extern void sum_i16 (gfc_array_m16 * const restrict,
gfc_array_m16 * const restrict, const index_type * const restrict);
export_proto(sum_i16);
diff --git a/libgfortran/generated/sum_i2.c b/libgfortran/generated/sum_i2.c
index 5d8ff3c60d0a..b13277772aef 100644
--- a/libgfortran/generated/sum_i2.c
+++ b/libgfortran/generated/sum_i2.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_2) && defined (HAVE_GFC_UINTEGER_2)
-extern void sum_i2 (gfc_array_m2 * const restrict,
+extern void sum_i2 (gfc_array_m2 * const restrict,
gfc_array_m2 * const restrict, const index_type * const restrict);
export_proto(sum_i2);
diff --git a/libgfortran/generated/sum_i4.c b/libgfortran/generated/sum_i4.c
index 841bb0d85283..9b2175730e2d 100644
--- a/libgfortran/generated/sum_i4.c
+++ b/libgfortran/generated/sum_i4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_4) && defined (HAVE_GFC_UINTEGER_4)
-extern void sum_i4 (gfc_array_m4 * const restrict,
+extern void sum_i4 (gfc_array_m4 * const restrict,
gfc_array_m4 * const restrict, const index_type * const restrict);
export_proto(sum_i4);
diff --git a/libgfortran/generated/sum_i8.c b/libgfortran/generated/sum_i8.c
index e260444b1db7..b3611044168e 100644
--- a/libgfortran/generated/sum_i8.c
+++ b/libgfortran/generated/sum_i8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_UINTEGER_8) && defined (HAVE_GFC_UINTEGER_8)
-extern void sum_i8 (gfc_array_m8 * const restrict,
+extern void sum_i8 (gfc_array_m8 * const restrict,
gfc_array_m8 * const restrict, const index_type * const restrict);
export_proto(sum_i8);
diff --git a/libgfortran/generated/sum_r10.c b/libgfortran/generated/sum_r10.c
index a63dcee63d8f..bcb1fdbbb63f 100644
--- a/libgfortran/generated/sum_r10.c
+++ b/libgfortran/generated/sum_r10.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_10) && defined (HAVE_GFC_REAL_10)
-extern void sum_r10 (gfc_array_r10 * const restrict,
+extern void sum_r10 (gfc_array_r10 * const restrict,
gfc_array_r10 * const restrict, const index_type * const restrict);
export_proto(sum_r10);
diff --git a/libgfortran/generated/sum_r16.c b/libgfortran/generated/sum_r16.c
index 80c8045c26a5..8858bb747cad 100644
--- a/libgfortran/generated/sum_r16.c
+++ b/libgfortran/generated/sum_r16.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_16) && defined (HAVE_GFC_REAL_16)
-extern void sum_r16 (gfc_array_r16 * const restrict,
+extern void sum_r16 (gfc_array_r16 * const restrict,
gfc_array_r16 * const restrict, const index_type * const restrict);
export_proto(sum_r16);
diff --git a/libgfortran/generated/sum_r17.c b/libgfortran/generated/sum_r17.c
index 83b093b6b150..0c7d39ac581c 100644
--- a/libgfortran/generated/sum_r17.c
+++ b/libgfortran/generated/sum_r17.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_17) && defined (HAVE_GFC_REAL_17)
-extern void sum_r17 (gfc_array_r17 * const restrict,
+extern void sum_r17 (gfc_array_r17 * const restrict,
gfc_array_r17 * const restrict, const index_type * const restrict);
export_proto(sum_r17);
diff --git a/libgfortran/generated/sum_r4.c b/libgfortran/generated/sum_r4.c
index 9ce9bb1dc295..05ab07a39855 100644
--- a/libgfortran/generated/sum_r4.c
+++ b/libgfortran/generated/sum_r4.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_4) && defined (HAVE_GFC_REAL_4)
-extern void sum_r4 (gfc_array_r4 * const restrict,
+extern void sum_r4 (gfc_array_r4 * const restrict,
gfc_array_r4 * const restrict, const index_type * const restrict);
export_proto(sum_r4);
diff --git a/libgfortran/generated/sum_r8.c b/libgfortran/generated/sum_r8.c
index c6869aa2d88e..576a7cde71b2 100644
--- a/libgfortran/generated/sum_r8.c
+++ b/libgfortran/generated/sum_r8.c
@@ -29,7 +29,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
#if defined (HAVE_GFC_REAL_8) && defined (HAVE_GFC_REAL_8)
-extern void sum_r8 (gfc_array_r8 * const restrict,
+extern void sum_r8 (gfc_array_r8 * const restrict,
gfc_array_r8 * const restrict, const index_type * const restrict);
export_proto(sum_r8);
More information about the Gcc-cvs
mailing list