re PR fortran/43136 (Excess copy-in/copy-out with character argument)

2019-01-15  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/43136
	* 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/43136
	* gfortran.dg/actual_array_substr_3.f90: New test.

From-SVN: r267954
This commit is contained in:
Thomas Koenig 2019-01-15 22:20:26 +00:00
parent 0335cc372c
commit 37879e0161
2 changed files with 2 additions and 2 deletions

View File

@ -1,6 +1,6 @@
2019-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/43072
PR fortran/43136
* resolve.c (resolve_array_ref): Add equal_length argument; set it
if the length of the substring equals that of the orignal
variable.

View File

@ -1,6 +1,6 @@
2019-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/43072
PR fortran/43136
* gfortran.dg/actual_array_substr_3.f90: New test.
2019-01-15 Steven G. Kargl <kargl@gcc.gnu.org>