https://gcc.gnu.org/g:898dedd2ee2b7d47879c8ec2534bab73503421eb
commit 898dedd2ee2b7d47879c8ec2534bab73503421eb Author: Mikael Morin <[email protected]> Date: Tue Sep 9 17:58:36 2025 +0200 Régénération fichiers générés Diff: --- libgfortran/generated/pack_c10.c | 2 +- libgfortran/generated/pack_c16.c | 2 +- libgfortran/generated/pack_c17.c | 2 +- libgfortran/generated/pack_c4.c | 2 +- libgfortran/generated/pack_c8.c | 2 +- libgfortran/generated/pack_i1.c | 2 +- libgfortran/generated/pack_i16.c | 2 +- libgfortran/generated/pack_i2.c | 2 +- libgfortran/generated/pack_i4.c | 2 +- libgfortran/generated/pack_i8.c | 2 +- libgfortran/generated/pack_r10.c | 2 +- libgfortran/generated/pack_r16.c | 2 +- libgfortran/generated/pack_r17.c | 2 +- libgfortran/generated/pack_r4.c | 2 +- libgfortran/generated/pack_r8.c | 2 +- 15 files changed, 15 insertions(+), 15 deletions(-) diff --git a/libgfortran/generated/pack_c10.c b/libgfortran/generated/pack_c10.c index fd2af090cc95..dba3af366e01 100644 --- a/libgfortran/generated/pack_c10.c +++ b/libgfortran/generated/pack_c10.c @@ -244,7 +244,7 @@ pack_c10 (gfc_array_c10 *ret, const gfc_array_c10 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_COMPLEX_10); - sptr = (const GFC_COMPLEX_10 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_COMPLEX_10 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_c16.c b/libgfortran/generated/pack_c16.c index 17ae51c83778..bc29673e1005 100644 --- a/libgfortran/generated/pack_c16.c +++ b/libgfortran/generated/pack_c16.c @@ -244,7 +244,7 @@ pack_c16 (gfc_array_c16 *ret, const gfc_array_c16 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_COMPLEX_16); - sptr = (const GFC_COMPLEX_16 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_COMPLEX_16 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_c17.c b/libgfortran/generated/pack_c17.c index 4da81441032b..1aad3b4044f1 100644 --- a/libgfortran/generated/pack_c17.c +++ b/libgfortran/generated/pack_c17.c @@ -244,7 +244,7 @@ pack_c17 (gfc_array_c17 *ret, const gfc_array_c17 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_COMPLEX_17); - sptr = (const GFC_COMPLEX_17 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_COMPLEX_17 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_c4.c b/libgfortran/generated/pack_c4.c index 29dd981b4de6..72b2cd964991 100644 --- a/libgfortran/generated/pack_c4.c +++ b/libgfortran/generated/pack_c4.c @@ -244,7 +244,7 @@ pack_c4 (gfc_array_c4 *ret, const gfc_array_c4 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_COMPLEX_4); - sptr = (const GFC_COMPLEX_4 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_COMPLEX_4 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_c8.c b/libgfortran/generated/pack_c8.c index 2bf8dfae04fb..a20fed0ef596 100644 --- a/libgfortran/generated/pack_c8.c +++ b/libgfortran/generated/pack_c8.c @@ -244,7 +244,7 @@ pack_c8 (gfc_array_c8 *ret, const gfc_array_c8 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_COMPLEX_8); - sptr = (const GFC_COMPLEX_8 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_COMPLEX_8 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_i1.c b/libgfortran/generated/pack_i1.c index 5ba4adfc7525..bdaa059d4382 100644 --- a/libgfortran/generated/pack_i1.c +++ b/libgfortran/generated/pack_i1.c @@ -244,7 +244,7 @@ pack_i1 (gfc_array_i1 *ret, const gfc_array_i1 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_INTEGER_1); - sptr = (const GFC_INTEGER_1 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_INTEGER_1 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_i16.c b/libgfortran/generated/pack_i16.c index 749fa8661c2c..05cfbb714730 100644 --- a/libgfortran/generated/pack_i16.c +++ b/libgfortran/generated/pack_i16.c @@ -244,7 +244,7 @@ pack_i16 (gfc_array_i16 *ret, const gfc_array_i16 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_INTEGER_16); - sptr = (const GFC_INTEGER_16 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_INTEGER_16 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_i2.c b/libgfortran/generated/pack_i2.c index 088b615fa2ac..a1fffc6dd112 100644 --- a/libgfortran/generated/pack_i2.c +++ b/libgfortran/generated/pack_i2.c @@ -244,7 +244,7 @@ pack_i2 (gfc_array_i2 *ret, const gfc_array_i2 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_INTEGER_2); - sptr = (const GFC_INTEGER_2 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_INTEGER_2 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_i4.c b/libgfortran/generated/pack_i4.c index 3662e418e891..84dda3d3f943 100644 --- a/libgfortran/generated/pack_i4.c +++ b/libgfortran/generated/pack_i4.c @@ -244,7 +244,7 @@ pack_i4 (gfc_array_i4 *ret, const gfc_array_i4 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_INTEGER_4); - sptr = (const GFC_INTEGER_4 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_INTEGER_4 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_i8.c b/libgfortran/generated/pack_i8.c index ff1212c0660e..e0694e285963 100644 --- a/libgfortran/generated/pack_i8.c +++ b/libgfortran/generated/pack_i8.c @@ -244,7 +244,7 @@ pack_i8 (gfc_array_i8 *ret, const gfc_array_i8 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_INTEGER_8); - sptr = (const GFC_INTEGER_8 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_INTEGER_8 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_r10.c b/libgfortran/generated/pack_r10.c index 121d5106e04a..41fc1b05efdc 100644 --- a/libgfortran/generated/pack_r10.c +++ b/libgfortran/generated/pack_r10.c @@ -244,7 +244,7 @@ pack_r10 (gfc_array_r10 *ret, const gfc_array_r10 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_REAL_10); - sptr = (const GFC_REAL_10 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_REAL_10 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_r16.c b/libgfortran/generated/pack_r16.c index a8e206a63f96..fea42bb24575 100644 --- a/libgfortran/generated/pack_r16.c +++ b/libgfortran/generated/pack_r16.c @@ -244,7 +244,7 @@ pack_r16 (gfc_array_r16 *ret, const gfc_array_r16 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_REAL_16); - sptr = (const GFC_REAL_16 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_REAL_16 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_r17.c b/libgfortran/generated/pack_r17.c index 796df84d5669..113c301f26c2 100644 --- a/libgfortran/generated/pack_r17.c +++ b/libgfortran/generated/pack_r17.c @@ -244,7 +244,7 @@ pack_r17 (gfc_array_r17 *ret, const gfc_array_r17 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_REAL_17); - sptr = (const GFC_REAL_17 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_REAL_17 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_r4.c b/libgfortran/generated/pack_r4.c index 422f2f95f6d7..90d0ae2e8671 100644 --- a/libgfortran/generated/pack_r4.c +++ b/libgfortran/generated/pack_r4.c @@ -244,7 +244,7 @@ pack_r4 (gfc_array_r4 *ret, const gfc_array_r4 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_REAL_4); - sptr = (const GFC_REAL_4 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_REAL_4 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) { diff --git a/libgfortran/generated/pack_r8.c b/libgfortran/generated/pack_r8.c index 4f00c9f89ccc..1c81f5cbce60 100644 --- a/libgfortran/generated/pack_r8.c +++ b/libgfortran/generated/pack_r8.c @@ -244,7 +244,7 @@ pack_r8 (gfc_array_r8 *ret, const gfc_array_r8 *array, if (sstride0 == 0) sstride0 = sizeof (GFC_REAL_8); - sptr = (const GFC_REAL_8 *sptr) (((char*)vector->base_addr) + sstride0 * nelem); + sptr = (const GFC_REAL_8 *) (((char*)vector->base_addr) + sstride0 * nelem); n -= nelem; while (n--) {
