diff options
| author | Tobias Burnus <tobias@codesourcery.com> | 2020-09-28 23:10:31 +0200 |
|---|---|---|
| committer | Tobias Burnus <tobias@codesourcery.com> | 2020-09-28 23:10:31 +0200 |
| commit | 69c56ce673d1e1d4508e82053a32011f807c6088 (patch) | |
| tree | a2747a3fb9be7e30568782c4331bd5e9e3f63b16 /libgfortran/generated/unpack_r10.c | |
| parent | 5f394e2d4c66678411c88b297f0db9a828214aef (diff) | |
| download | gcc-69c56ce673d1e1d4508e82053a32011f807c6088.zip gcc-69c56ce673d1e1d4508e82053a32011f807c6088.tar.gz gcc-69c56ce673d1e1d4508e82053a32011f807c6088.tar.bz2 | |
libgfortran/m4/unpack.m4: Silence -Wmaybe-uninitialized
libgfortran/ChangeLog:
* m4/unpack.m4 (unpack0_'rtype_code`,
unpack1_'rtype_code`): Move 'rstride[0]' initialization outside
conditional branch to silence -Wmaybe-uninitialized.
* generated/unpack_c10.c: Regenerate.
* generated/unpack_c16.c: Regenerate.
* generated/unpack_c4.c: Regenerate.
* generated/unpack_c8.c: Regenerate.
* generated/unpack_i1.c: Regenerate.
* generated/unpack_i16.c: Regenerate.
* generated/unpack_i2.c: Regenerate.
* generated/unpack_i4.c: Regenerate.
* generated/unpack_i8.c: Regenerate.
* generated/unpack_r10.c: Regenerate.
* generated/unpack_r16.c: Regenerate.
* generated/unpack_r4.c: Regenerate.
* generated/unpack_r8.c: Regenerate.
Diffstat (limited to 'libgfortran/generated/unpack_r10.c')
| -rw-r--r-- | libgfortran/generated/unpack_r10.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/libgfortran/generated/unpack_r10.c b/libgfortran/generated/unpack_r10.c index 7981754..4044ec3f 100644 --- a/libgfortran/generated/unpack_r10.c +++ b/libgfortran/generated/unpack_r10.c @@ -79,6 +79,8 @@ unpack0_r10 (gfc_array_r10 *ret, const gfc_array_r10 *vector, else runtime_error ("Funny sized logical array"); + /* Initialize to avoid -Wmaybe-uninitialized complaints. */ + rstride[0] = 1; if (ret->base_addr == NULL) { /* The front end has signalled that we need to populate the @@ -102,8 +104,6 @@ unpack0_r10 (gfc_array_r10 *ret, const gfc_array_r10 *vector, else { dim = GFC_DESCRIPTOR_RANK (ret); - /* Initialize to avoid -Wmaybe-uninitialized complaints. */ - rstride[0] = 1; for (n = 0; n < dim; n++) { count[n] = 0; @@ -225,6 +225,8 @@ unpack1_r10 (gfc_array_r10 *ret, const gfc_array_r10 *vector, else runtime_error ("Funny sized logical array"); + /* Initialize to avoid -Wmaybe-uninitialized complaints. */ + rstride[0] = 1; if (ret->base_addr == NULL) { /* The front end has signalled that we need to populate the @@ -249,8 +251,6 @@ unpack1_r10 (gfc_array_r10 *ret, const gfc_array_r10 *vector, else { dim = GFC_DESCRIPTOR_RANK (ret); - /* Initialize to avoid -Wmaybe-uninitialized complaints. */ - rstride[0] = 1; for (n = 0; n < dim; n++) { count[n] = 0; |