]> git.ipfire.org Git - thirdparty/gcc.git/commit - gcc/fortran/trans-types.cc
re PR fortran/36592 (F2003: Procedure pointer in COMMON)
authorJanus Weil <janus@gcc.gnu.org>
Tue, 30 Sep 2008 15:19:25 +0000 (17:19 +0200)
committerTobias Burnus <burnus@gcc.gnu.org>
Tue, 30 Sep 2008 15:19:25 +0000 (17:19 +0200)
commit00625faea4cda0dfc67ab80eb96ece62fecc7423
tree75cd54d881deff55c9d3b96eaeece2630d5c9711
parentf249018cc269d703667b34af30285b451b20391c
re PR fortran/36592 (F2003: Procedure pointer in COMMON)

2008-09-30  Janus Weil  <janus@gcc.gnu.org>

        PR fortran/36592
        * symbol.c (check_conflict): If a symbol in a COMMON block is a
        procedure, it must be a procedure pointer.
        (gfc_add_in_common): Symbols in COMMON blocks may be variables or
        procedure pointers.
        * trans-types.c (gfc_sym_type): Make procedure pointers in
        * COMMON
        blocks work.

2008-09-30  Janus Weil  <janus@gcc.gnu.org>

        PR fortran/36592
        * gfortran.dg/proc_ptr_common_1.f90: New.
        * gfortran.dg/proc_ptr_common_2.f90: New.

From-SVN: r140790
gcc/fortran/ChangeLog
gcc/fortran/symbol.c
gcc/fortran/trans-types.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/proc_ptr_common_1.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/proc_ptr_common_2.f90 [new file with mode: 0644]