[Bug fortran/82923] Automatic allocation of deferred length character using function result

[dominiq at lps dot ens.fr]

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

Dominique d'Humieres <dominiq at lps dot ens.fr> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2017-11-09
     Ever confirmed|0                           |1

--- Comment #1 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
Confirmed from 4.8 up to trunk (8.0). Note that if the compiler is configured
with --enable-checking=yes, I get

pr82923.f90:11:0:

 program testca

Error: Local declaration from a different function
..__result
pr82923.f90:27:0:

     mine = getchars(2,4)

note: in statement
.mine = ..__result;
pr82923.f90:11:0:

 program testca

Error: Local declaration from a different function
..__result
pr82923.f90:27:0:

     mine = getchars(2,4)

note: in statement
_101 = (integer(kind=8)) ..__result;
pr82923.f90:11:0:

 program testca

Error: Local declaration from a different function
..__result
pr82923.f90:27:0:

     mine = getchars(2,4)

note: in statement
D.3753 = (sizetype) ..__result;
during GIMPLE pass: cfg
pr82923.f90:11:0:

 program testca

internal compiler error: verify_gimple failed

instead of

during RTL pass: expand
pr82923.f90:27:0:

     mine = getchars(2,4)

internal compiler error: in expand_expr_real_1, at expr.c:9865

for 5.5.0 to 8.0 and

pr82923.f90:27:0: internal compiler error: in gimplify_var_or_parm_decl, at
gimplify.c:1741
     mine = getchars(2,4)
 ^
for 4.8 and 4.9.

No duplicate in store.