[Bug fortran/31608] wrong types in character array/scalar binop

[pault at gcc dot gnu dot org]

------- Comment #35 from pault at gcc dot gnu dot org  2007-10-20 09:27 -------
Subject: Bug 31608

Author: pault
Date: Sat Oct 20 09:27:09 2007
New Revision: 129505

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=129505
Log:
2007-10-20  Paul Thomas  <[EMAIL PROTECTED]>
            FX Coudert <[EMAIL PROTECTED]>

        PR fortran/31608
        * trans-array.c (gfc_conv_expr_descriptor): For all except
        indirect references, use gfc_trans_scalar_assign instead of
        gfc_add_modify_expr.
        * iresolve.c (check_charlen_present): Separate creation of cl
        if necessary and add code to treat an EXPR_ARRAY.
        (gfc_resolve_char_achar): New function.
        (gfc_resolve_achar, gfc_resolve_char): Call it.
        (gfc_resolve_transfer): If the MOLD expression does not have a
        character length expression, get it from a constant length.

2007-10-20  Paul Thomas  <[EMAIL PROTECTED]>
            FX Coudert <[EMAIL PROTECTED]>

        PR fortran/31608
        * gfortran.dg/char_cast_1.f90: New test.


Added:
    trunk/gcc/testsuite/gfortran.dg/char_cast_1.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/iresolve.c
    trunk/gcc/fortran/trans-array.c
    trunk/gcc/testsuite/ChangeLog


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31608