[Bug fortran/43136] Excess copy-in/copy-out with character argument

[tkoenig at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=43136

--- Comment #5 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
Author: tkoenig
Date: Tue Jan 15 22:20:26 2019
New Revision: 267954

URL: https://gcc.gnu.org/viewcvs?rev=267954&root=gcc&view=rev
Log:
2019-01-15  Thomas Koenig  <tkoe...@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  <tkoe...@gcc.gnu.org>

        PR fortran/43136
        * gfortran.dg/actual_array_substr_3.f90: New test.


Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/testsuite/ChangeLog