diff options
| author | Richard Biener <rguenther@suse.de> | 2016-09-22 12:15:38 +0000 |
|---|---|---|
| committer | Richard Biener <rguenth@gcc.gnu.org> | 2016-09-22 12:15:38 +0000 |
| commit | c813f2686aa230cf20ca954dee94b1019b7c364b (patch) | |
| tree | b36d87ac28037a7dbaa8da78ddb9c97733ec4f75 /gcc | |
| parent | b8ffdd9730b00a64e85eb2e3881b9006932b41bb (diff) | |
| download | gcc-c813f2686aa230cf20ca954dee94b1019b7c364b.zip gcc-c813f2686aa230cf20ca954dee94b1019b7c364b.tar.gz gcc-c813f2686aa230cf20ca954dee94b1019b7c364b.tar.bz2 | |
re PR fortran/77678 (ICE in fold_read_from_constant_string, at fold-const.c:13706)
2016-09-22 Richard Biener <rguenther@suse.de>
PR middle-end/77678
* expr.c (expand_expr_real_1): Guard array access against negative
offset.
From-SVN: r240351
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/expr.c | 3 |
2 files changed, 8 insertions, 1 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 485d808..9b17925 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,9 @@ +2016-09-22 Richard Biener <rguenther@suse.de> + + PR middle-end/77678 + * expr.c (expand_expr_real_1): Guard array access against negative + offset. + 2016-09-22 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> * gimple-ssa-sprintf.c (format_floating_max): Use GMP_RNDN instead @@ -10274,7 +10274,8 @@ expand_expr_real_1 (tree exp, rtx target, machine_mode tmode, fold_convert_loc (loc, sizetype, low_bound)); - if (compare_tree_int (index1, TREE_STRING_LENGTH (init)) < 0) + if (tree_fits_uhwi_p (index1) + && compare_tree_int (index1, TREE_STRING_LENGTH (init)) < 0) { tree type = TREE_TYPE (TREE_TYPE (init)); machine_mode mode = TYPE_MODE (type); |