mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-02-10 20:20:06 +08:00
Code Issues Packages Projects Releases Wiki Activity

re PR libfortran/31295 (Uninitialized variable in libgfortran's _gfortran_eoshift0_4)

Browse Source 
2007-05-22  Tobias Burnus  <burnus@net-b.de>

       PR libgfortran/31295
       * intrinsics/eoshift0.c (eoshift0): Silence uninitialized warning.
       * intrinsics/eoshift2.c (eoshift2): Ditto.

From-SVN: r124948
This commit is contained in:
Tobias Burnus 2007-05-22 18:19:09 +02:00 committed by Tobias Burnus
parent 056299563b
commit 1f801ab788
3 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
libgfortran/ChangeLog
View File

@ -1,3 +1,9 @@
2007-05-22 Tobias Burnus <burnus@net-b.de>
PR libgfortran/31295
* intrinsics/eoshift0.c (eoshift0): Silence uninitialized warning.
* intrinsics/eoshift2.c (eoshift2): Ditto.
2007-05-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libfortran/31964

2
libgfortran/intrinsics/eoshift0.c
View File

@ -90,6 +90,8 @@ eoshift0 (gfc_array_char * ret, const gfc_array_char * array,
extent[0] = 1;
count[0] = 0;
sstride[0] = -1;
rstride[0] = -1;
n = 0;
for (dim = 0; dim < GFC_DESCRIPTOR_RANK (array); dim++)
{

3
libgfortran/intrinsics/eoshift2.c
View File

@ -94,6 +94,9 @@ eoshift2 (gfc_array_char *ret, const gfc_array_char *array,
extent[0] = 1;
count[0] = 0;
sstride[0] = -1;
rstride[0] = -1;
bstride[0] = -1;
n = 0;
for (dim = 0; dim < GFC_DESCRIPTOR_RANK (array); dim++)
{