OSDN Git Service

2010-12-07 Tobias Burnus <burnus@net-b.de>
authorburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 7 Dec 2010 20:29:22 +0000 (20:29 +0000)
committerburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 7 Dec 2010 20:29:22 +0000 (20:29 +0000)
commitb8a1b636ab10d0aebeb0dd5d142beac78bcf3c1e
treee7e1fc5703a091effe8fea53af8030ecc6d89a3f
parent5f871c7bb7372cdb2db7557ad94b7e729fe52fd2
2010-12-07  Tobias Burnus  <burnus@net-b.de>

        PR fortran/44352
        * trans-expr.c (gfc_string_to_single_character): Return if not
        POINTER_TYPE_P.
        (gfc_trans_string_copy): gfc_build_addr_expr if src or dest is
        not a pointer.
        (gfc_trans_string_copy): Make sure the argument string type
        has a string length, fix indention, and remove not needed
        gfc_build_addr_expr.

2010-12-07  Tobias Burnus  <burnus@net-b.de>

        PR fortran/44352
        * gfortran.dg/string_4.f90: New.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@167569 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/trans-expr.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/string_4.f90 [new file with mode: 0644]