diff options
| author | Thomas Koenig <tkoenig@gcc.gnu.org> | 2019-01-15 22:18:55 +0000 |
|---|---|---|
| committer | Thomas Koenig <tkoenig@gcc.gnu.org> | 2019-01-15 22:18:55 +0000 |
| commit | 0335cc372c9849c61b9a5583655820d88ecf829e (patch) | |
| tree | 422262bd5ef07f5e981b8ccb2e3429ce59dd8e15 /gcc/d/expr.cc | |
| parent | 6a0c8e77f289a5c2e1b1ad0f2c8a5c5105f599a6 (diff) | |
| download | gcc-0335cc372c9849c61b9a5583655820d88ecf829e.zip gcc-0335cc372c9849c61b9a5583655820d88ecf829e.tar.gz gcc-0335cc372c9849c61b9a5583655820d88ecf829e.tar.bz2 | |
re PR fortran/43072 (unneeded temporary (s=s+f(a)))
2019-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/43072
* resolve.c (resolve_array_ref): Add equal_length argument; set it
if the length of the substring equals that of the orignal
variable.
(resolve_ref): Remove the substring if it is equal in length to
the original variable, unless it is an EXPR_SUBSTRING).
2019-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/43072
* gfortran.dg/actual_array_substr_3.f90: New test.
From-SVN: r267953
Diffstat (limited to 'gcc/d/expr.cc')
0 files changed, 0 insertions, 0 deletions