OSDN Git Service

2008-09-30 Janus Weil <janus@gcc.gnu.org>
authorburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 30 Sep 2008 15:19:25 +0000 (15:19 +0000)
committerburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 30 Sep 2008 15:19:25 +0000 (15:19 +0000)
commit18b4ceabe5285e62783aba275106ca8878a1291e
tree75cd54d881deff55c9d3b96eaeece2630d5c9711
parent03b5bd9cf3a050e7021c0a39ebb077ee3bbc2d5f
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.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@140790 138bc75d-0d04-0410-961f-82ee72b054a4
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]