diff options
author | fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-05-16 16:53:02 +0000 |
---|---|---|
committer | fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-05-16 16:53:02 +0000 |
commit | 7ad1f5f6f908c6cc8c276693e5dfe03214f69f88 (patch) | |
tree | c2d721e1845abbc3569797c630078a90a7ba5746 /gcc/fortran/ChangeLog | |
parent | 38c0064e39c5379fc02a38d08c3a25be97b233fc (diff) | |
download | gcc-7ad1f5f6f908c6cc8c276693e5dfe03214f69f88.tar.gz |
PR fortran/31243
* resolve.c (resolve_substring): Don't allow too large substring
indexes.
(gfc_resolve_substring_charlen): Fix typo.
(gfc_resolve_character_operator): Fix typo.
(resolve_charlen): Catch unreasonably large string lengths.
* simplify.c (gfc_simplify_len): Don't error out on LEN
range checks.
* gcc/testsuite/gfortran.dg/string_1.f90: New test.
* gcc/testsuite/gfortran.dg/string_2.f90: New test.
* gcc/testsuite/gfortran.dg/string_3.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@147619 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/ChangeLog')
-rw-r--r-- | gcc/fortran/ChangeLog | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 81182dfe29f..0b8146430a4 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,16 @@ 2009-05-16 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> + PR fortran/31243 + * resolve.c (resolve_substring): Don't allow too large substring + indexes. + (gfc_resolve_substring_charlen): Fix typo. + (gfc_resolve_character_operator): Fix typo. + (resolve_charlen): Catch unreasonably large string lengths. + * simplify.c (gfc_simplify_len): Don't error out on LEN + range checks. + +2009-05-16 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> + PR fortran/36031 * decl.c (set_enum_kind): Use global short-enums flag. * gfortran.h (gfc_option_t): Remove short_enums flag. |