| commit | ad4a2f64b9bf7a77e8db1ddcb4ef5275f1897ac4 | |
| author | Tobias Burnus <burnus@gcc.gnu.org> | |
| Wed, 29 Aug 2007 13:08:55 +0000 (29 15:08 +0200) | ||
| committer | Tobias Burnus <burnus@gcc.gnu.org> | |
| Wed, 29 Aug 2007 13:08:55 +0000 (29 15:08 +0200) | ||
| tree | 13f2de74f89f6097aa95ac4bda69a46d83215792 | treesnapshot (tar.gz zip) |
| parent | 4376b7cf2b7d906c1952205ec3242e689f84f671 | commitdiff |
re PR fortran/33215 (Bind(C): Bugs with empty "name=": Creates wrong result and accepts invalid)
2007-08-29 Christopher D. Rickett <crickett@lanl.gov>
PR fortran/33215
* decl.c (build_sym): Pass number of identifiers on line to
set_binding_label.
(set_binding_label): Verify that only one identifier given if
NAME= specified, even if the given binding label has zero length.
(gfc_match_bind_c): Remove declaration for has_name_equals because
it hides the static global one that is needed.
2007-08-29 Christopher D. Rickett <crickett@lanl.gov>
PR fortran/33215
* gfortran.dg/binding_label_tests_15.f03: New test case.
* gfortran.dg/binding_label_tests_16.f03: Ditto.
From-SVN: r127898
2007-08-29 Christopher D. Rickett <crickett@lanl.gov>
PR fortran/33215
* decl.c (build_sym): Pass number of identifiers on line to
set_binding_label.
(set_binding_label): Verify that only one identifier given if
NAME= specified, even if the given binding label has zero length.
(gfc_match_bind_c): Remove declaration for has_name_equals because
it hides the static global one that is needed.
2007-08-29 Christopher D. Rickett <crickett@lanl.gov>
PR fortran/33215
* gfortran.dg/binding_label_tests_15.f03: New test case.
* gfortran.dg/binding_label_tests_16.f03: Ditto.
From-SVN: r127898
| gcc/fortran/ChangeLog | diffblobblamehistory | |
| gcc/fortran/decl.c | diffblobblamehistory | |
| gcc/testsuite/ChangeLog | diffblobblamehistory | |
| gcc/testsuite/gfortran.dg/binding_label_tests_15.f03 | [new file with mode: 0644] | blob |
| gcc/testsuite/gfortran.dg/binding_label_tests_16.f03 | [new file with mode: 0644] | blob |