git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

re PR libfortran/18958 ([4.0 only] eoshift segfaults when shifting off the end of an array) 

2005-04-30  Thomas Koenig  <Thomas.Koenig@online.de>

        PR libfortran/18958
        libgfortran.h:  Change typedef of index_type from size_t
        to ssize_t.

2005-04-30  Thomas Koenig  <Thomas.Koenig@online.de>

        PR libfortran/18958
        * gfortran.dg/eoshift.f90:  New test case.

From-SVN: r99047
This commit is contained in:
Thomas Koenig 2005-04-30 20:51:39 +00:00 committed by Thomas Koenig
parent f1aa042fee
commit 8e249b232d
4 changed files with 18 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,8 @@
2005-04-30 Thomas Koenig <Thomas.Koenig@online.de>
PR libfortran/18958
* gfortran.dg/eoshift.f90: New test case.
2005-04-30 Paul Thomas <pault@gcc.gnu.org> 2005-04-30 Paul Thomas <pault@gcc.gnu.org>
PR libfortran/18857 PR libfortran/18857

6
gcc/testsuite/gfortran.dg/eoshift.f90 Normal file
View File

@ -0,0 +1,6 @@
! { dg-do run }
! PR 18958: We used to segfault for eoshifting off the end of an array.
program main
character(len=20) line
write (line,'(I4)') eoshift((/1, 3/), 3)
end program main

6
libgfortran/ChangeLog
View File

@ -1,3 +1,9 @@
2005-04-30 Thomas Koenig <Thomas.Koenig@online.de>
PR libfortran/18958
libgfortran.h: Change typedef of index_type from size_t
to ssize_t.
2005-04-30 Paul Thomas <pault@gcc.gnu.org> 2005-04-30 Paul Thomas <pault@gcc.gnu.org>
PR libfortran/18857 PR libfortran/18857

2
libgfortran/libgfortran.h
View File

@ -215,7 +215,7 @@ typedef complex double GFC_COMPLEX_8;
/* The following two definitions must be consistent with the types used /* The following two definitions must be consistent with the types used
by the compiler. */ by the compiler. */
/* The type used of array indices, amongst other things. */ /* The type used of array indices, amongst other things. */
typedef size_t index_type; typedef ssize_t index_type;
/* The type used for the lengths of character variables. */ /* The type used for the lengths of character variables. */
typedef GFC_INTEGER_4 gfc_charlen_type; typedef GFC_INTEGER_4 gfc_charlen_type;