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

--- Comment #20 from Janne Blomqvist <jb at gcc dot gnu.org> ---
Author: jb
Date: Wed Mar 21 18:46:44 2018
New Revision: 258736

URL: https://gcc.gnu.org/viewcvs?rev=258736&root=gcc&view=rev
Log:
PR 84615 Regressions due to type mismatch with character functions

Since the kind of the hidden character length variable is not part of
the character variable definition, we must ensure that character
lengths are always of the same kind in interfaces, regardless of how
they were declared in the source. This patch ensures this when calling
a procedure.

Regtested on x86_64-pc-linux-gnu and i686-pc-linux-gnu.

gcc/fortran/ChangeLog:

2018-03-21  Janne Blomqvist  <j...@gcc.gnu.org>

        PR fortran/84615
        * trans-expr.c (gfc_conv_procedure_call): Convert charlen to
        gfc_charlen_type_node when calling procedure.

gcc/testsuite/ChangeLog:

2018-03-21  Janne Blomqvist  <j...@gcc.gnu.org>

        PR fortran/84615
        * gfortran.dg/char_result_17.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/char_result_17.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-expr.c
    trunk/gcc/testsuite/ChangeLog

Reply via email to