[Bug fortran/36275] [F03] Binding label can be any scalar char initialisation expression

[Bug fortran/36275] [F03] Binding label can be any scalar char initialisation expression

[janus at gcc dot gnu.org]

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

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|jaydub66 at gmail dot com   |janus at gcc dot gnu.org
            Summary|Binding label can be any    |[F03] Binding label can be
                   |scalar char initialisation  |any scalar char
                   |expression                  |initialisation expression

--- Comment #10 from janus at gcc dot gnu.org 2012-10-07 11:28:29 UTC ---
Note that arbitrary long binding names have been implemented in the meantime
(PR51808).

A fix for this PR should obviously maintain that feature (which Mikael's patch
in comment 6 does not seem to do).

[Bug fortran/36275] [F03] Binding label can be any scalar char initialisation expression

[fxcoudert at gcc dot gnu.org]

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

Francois-Xavier Coudert <fxcoudert at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |ASSIGNED
           Assignee|unassigned at gcc dot gnu.org      |fxcoudert at gcc dot gnu.org

--- Comment #11 from Francois-Xavier Coudert <fxcoudert at gcc dot gnu.org> ---
Patch proposed here, somewhat based on Mikael's patch in comment #6:
https://gcc.gnu.org/ml/fortran/2014-06/msg00090.html

[Bug fortran/36275] [F03] Binding label can be any scalar char initialisation expression

[fxcoudert at gcc dot gnu.org]

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

Francois-Xavier Coudert <fxcoudert at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|ASSIGNED                    |RESOLVED
         Resolution|---                         |FIXED
   Target Milestone|---                         |4.10.0

--- Comment #13 from Francois-Xavier Coudert <fxcoudert at gcc dot gnu.org> ---
Fixed on trunk.

[Bug fortran/36275] [F03] Binding label can be any scalar char initialisation expression

[fxcoudert at gcc dot gnu.org]

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

--- Comment #12 from Francois-Xavier Coudert <fxcoudert at gcc dot gnu.org> ---
Author: fxcoudert
Date: Sun Jun 29 14:14:16 2014
New Revision: 212123

URL: https://gcc.gnu.org/viewcvs?rev=212123&root=gcc&view=rev
Log:
    PR fortran/36275
    PR fortran/38839

    * decl.c (check_bind_name_identifier): New function.
    (gfc_match_bind_c): Match any constant expression as binding
    label.
    * match.c (gfc_match_name_C): Remove.

    * gfortran.dg/binding_label_tests_2.f03: Adjust error messages.
    * gfortran.dg/binding_label_tests_27.f90: New file.

Added:
    trunk/gcc/testsuite/gfortran.dg/binding_label_tests_27.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/decl.c
    trunk/gcc/fortran/match.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/binding_label_tests_2.f03