https://gcc.gnu.org/g:755372267d112d83d93fd7541218263f5dadd086
commit 755372267d112d83d93fd7541218263f5dadd086 Author: Mikael Morin <[email protected]> Date: Fri Sep 12 19:01:09 2025 +0200 Régénération fichiers générés Diff: --- libgfortran/generated/findloc1_c10.c | 2 +- libgfortran/generated/findloc1_c16.c | 2 +- libgfortran/generated/findloc1_c17.c | 2 +- libgfortran/generated/findloc1_c4.c | 2 +- libgfortran/generated/findloc1_c8.c | 2 +- libgfortran/generated/findloc1_i1.c | 2 +- libgfortran/generated/findloc1_i16.c | 2 +- libgfortran/generated/findloc1_i2.c | 2 +- libgfortran/generated/findloc1_i4.c | 2 +- libgfortran/generated/findloc1_i8.c | 2 +- libgfortran/generated/findloc1_r10.c | 2 +- libgfortran/generated/findloc1_r16.c | 2 +- libgfortran/generated/findloc1_r17.c | 2 +- libgfortran/generated/findloc1_r4.c | 2 +- libgfortran/generated/findloc1_r8.c | 2 +- libgfortran/generated/findloc1_s1.c | 2 +- libgfortran/generated/findloc1_s4.c | 2 +- 17 files changed, 17 insertions(+), 17 deletions(-) diff --git a/libgfortran/generated/findloc1_c10.c b/libgfortran/generated/findloc1_c10.c index 57a9c0ecd283..cc099b689bd7 100644 --- a/libgfortran/generated/findloc1_c10.c +++ b/libgfortran/generated/findloc1_c10.c @@ -139,7 +139,7 @@ findloc1_c10 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_c16.c b/libgfortran/generated/findloc1_c16.c index dc6198121855..83cee88cb95d 100644 --- a/libgfortran/generated/findloc1_c16.c +++ b/libgfortran/generated/findloc1_c16.c @@ -139,7 +139,7 @@ findloc1_c16 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_c17.c b/libgfortran/generated/findloc1_c17.c index b38dabe2c524..c6392edcce34 100644 --- a/libgfortran/generated/findloc1_c17.c +++ b/libgfortran/generated/findloc1_c17.c @@ -139,7 +139,7 @@ findloc1_c17 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_c4.c b/libgfortran/generated/findloc1_c4.c index 8a7a2a7c40ba..be8551fc29aa 100644 --- a/libgfortran/generated/findloc1_c4.c +++ b/libgfortran/generated/findloc1_c4.c @@ -139,7 +139,7 @@ findloc1_c4 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_c8.c b/libgfortran/generated/findloc1_c8.c index 1fd996d3c6f8..1bbef53695fa 100644 --- a/libgfortran/generated/findloc1_c8.c +++ b/libgfortran/generated/findloc1_c8.c @@ -139,7 +139,7 @@ findloc1_c8 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_i1.c b/libgfortran/generated/findloc1_i1.c index 5ff0b02dbd0d..7be40974e8a5 100644 --- a/libgfortran/generated/findloc1_i1.c +++ b/libgfortran/generated/findloc1_i1.c @@ -139,7 +139,7 @@ findloc1_i1 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_i16.c b/libgfortran/generated/findloc1_i16.c index 60e91d45271d..909a618201fa 100644 --- a/libgfortran/generated/findloc1_i16.c +++ b/libgfortran/generated/findloc1_i16.c @@ -139,7 +139,7 @@ findloc1_i16 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_i2.c b/libgfortran/generated/findloc1_i2.c index 8dcac4064f26..05f7604bf5c8 100644 --- a/libgfortran/generated/findloc1_i2.c +++ b/libgfortran/generated/findloc1_i2.c @@ -139,7 +139,7 @@ findloc1_i2 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_i4.c b/libgfortran/generated/findloc1_i4.c index cd94ae718716..07954ffc581d 100644 --- a/libgfortran/generated/findloc1_i4.c +++ b/libgfortran/generated/findloc1_i4.c @@ -139,7 +139,7 @@ findloc1_i4 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_i8.c b/libgfortran/generated/findloc1_i8.c index 42eae7203421..ed3f62b99f75 100644 --- a/libgfortran/generated/findloc1_i8.c +++ b/libgfortran/generated/findloc1_i8.c @@ -139,7 +139,7 @@ findloc1_i8 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_r10.c b/libgfortran/generated/findloc1_r10.c index d9a85e850cb2..738268678301 100644 --- a/libgfortran/generated/findloc1_r10.c +++ b/libgfortran/generated/findloc1_r10.c @@ -139,7 +139,7 @@ findloc1_r10 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_r16.c b/libgfortran/generated/findloc1_r16.c index 368046941ac7..7f9fa5ecfc3f 100644 --- a/libgfortran/generated/findloc1_r16.c +++ b/libgfortran/generated/findloc1_r16.c @@ -139,7 +139,7 @@ findloc1_r16 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_r17.c b/libgfortran/generated/findloc1_r17.c index 0bfd4ed9d0eb..95a79ac93aff 100644 --- a/libgfortran/generated/findloc1_r17.c +++ b/libgfortran/generated/findloc1_r17.c @@ -139,7 +139,7 @@ findloc1_r17 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_r4.c b/libgfortran/generated/findloc1_r4.c index 3288ea0c3a3e..f9d3f59341c9 100644 --- a/libgfortran/generated/findloc1_r4.c +++ b/libgfortran/generated/findloc1_r4.c @@ -139,7 +139,7 @@ findloc1_r4 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_r8.c b/libgfortran/generated/findloc1_r8.c index 426468f1f43d..83ad7544d5f0 100644 --- a/libgfortran/generated/findloc1_r8.c +++ b/libgfortran/generated/findloc1_r8.c @@ -139,7 +139,7 @@ findloc1_r8 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (*src == value) diff --git a/libgfortran/generated/findloc1_s1.c b/libgfortran/generated/findloc1_s1.c index 4d00ac305652..a243e4606ac6 100644 --- a/libgfortran/generated/findloc1_s1.c +++ b/libgfortran/generated/findloc1_s1.c @@ -141,7 +141,7 @@ findloc1_s1 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (compare_string (len_array, (char *) src, len_value, (char *) value) == 0) diff --git a/libgfortran/generated/findloc1_s4.c b/libgfortran/generated/findloc1_s4.c index 61e1a57a78f8..4214658bd007 100644 --- a/libgfortran/generated/findloc1_s4.c +++ b/libgfortran/generated/findloc1_s4.c @@ -141,7 +141,7 @@ findloc1_s4 (gfc_array_index_type * const restrict retarray, result = 0; if (back) { - src = PTR_ADD_OFFSET (array->base_addr, (len - 1) * delta); + src = PTR_ADD_OFFSET (base, (len - 1) * delta); for (n = len; n > 0; n--) { if (compare_string_char4 (len_array, src, len_value, value) == 0)
