]> git.ipfire.org Git - thirdparty/gcc.git/commit - gcc/fortran/decl.c
re PR fortran/48858 (Incorrect error for same binding label on two generic interface...
authorTobias Burnus <burnus@net-b.de>
Mon, 20 May 2013 20:03:48 +0000 (22:03 +0200)
committerTobias Burnus <burnus@gcc.gnu.org>
Mon, 20 May 2013 20:03:48 +0000 (22:03 +0200)
commit878cdb7b38f5487d0ab7933377174a552b5f7d80
tree73668c05f30962cb8036747eb6744fb502ce15b9
parent9bbc95654de572e68a6afe4dd892721d34304ed6
re PR fortran/48858 (Incorrect error for same binding label on two generic interface specifics)

2013-05-20  Tobias Burnus  <burnus@net-b.de>

        PR fortran/48858
        * decl.c (gfc_match_bind_c_stmt): Add gfc_notify_std.
        * match.c (gfc_match_common): Don't add commons to gsym.
        * resolve.c (resolve_common_blocks): Add to gsym and
        add checks.
        (resolve_bind_c_comms): Remove.
        (resolve_types): Remove call to the latter.
        * trans-common.c (gfc_common_ns): Remove static var.
        (gfc_map_of_all_commons): Add static var.
        (build_common_decl): Correctly handle binding label.

2013-05-20  Tobias Burnus  <burnus@net-b.de>

        PR fortran/48858
        * gfortran.dg/test_common_binding_labels.f03: Update dg-error.
        * gfortran.dg/test_common_binding_labels_2_main.f03: Ditto.
        * gfortran.dg/test_common_binding_labels_3_main.f03: Ditto.
        * gfortran.dg/common_18.f90: New.
        * gfortran.dg/common_19.f90: New.
        * gfortran.dg/common_20.f90: New.
        * gfortran.dg/common_21.f90: New.

From-SVN: r199118
13 files changed:
gcc/fortran/ChangeLog
gcc/fortran/decl.c
gcc/fortran/match.c
gcc/fortran/resolve.c
gcc/fortran/trans-common.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/common_18.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/common_19.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/common_20.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/common_21.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/test_common_binding_labels.f03
gcc/testsuite/gfortran.dg/test_common_binding_labels_2_main.f03
gcc/testsuite/gfortran.dg/test_common_binding_labels_3_main.f03