[Bug fortran/55905] [OOP] [F008] ICE for polymorphic dummy argument with an allocatable coarray component

[janus at gcc dot gnu.org]

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

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2013-01-10
                 CC|                            |janus at gcc dot gnu.org
            Summary|ICE for polymorphic dummy   |[OOP] [F008] ICE for
                   |argument with an            |polymorphic dummy argument
                   |allocatable coarray         |with an allocatable coarray
                   |component                   |component
     Ever Confirmed|0                           |1

--- Comment #1 from janus at gcc dot gnu.org 2013-01-10 08:30:35 UTC ---
I can confirm it with:

gcc version 4.8.0 20130105 (experimental) [trunk revision 194927] (GCC)

I get the following backtrace:

0xb0d96d crash_signal
        /home/jweil/gcc48/trunk/gcc/toplev.c:334
0x616b10 tree_class_check(tree_node*, tree_code_class, char const*,
int, char const*)
        /home/jweil/gcc48/trunk/gcc/tree.h:3793
0x64366a duplicate_allocatable
        /home/jweil/gcc48/trunk/gcc/fortran/trans-array.c:7334
0x6439cf gfc_duplicate_allocatable(tree_node*, tree_node*, tree_node*, int)
        /home/jweil/gcc48/trunk/gcc/fortran/trans-array.c:7396
0x644d00 structure_alloc_comps
        /home/jweil/gcc48/trunk/gcc/fortran/trans-array.c:7738
0x644ee2 gfc_copy_alloc_comp(gfc_symbol*, tree_node*, tree_node*, int)
        /home/jweil/gcc48/trunk/gcc/fortran/trans-array.c:7790
0x6741e9 gfc_trans_scalar_assign(gfc_se*, gfc_se*, gfc_typespec, bool,
bool, bool)
        /home/jweil/gcc48/trunk/gcc/fortran/trans-expr.c:6841
0x676cf7 gfc_trans_assignment_1
        /home/jweil/gcc48/trunk/gcc/fortran/trans-expr.c:7757
0x677342 gfc_trans_assignment(gfc_expr*, gfc_expr*, bool, bool)
        /home/jweil/gcc48/trunk/gcc/fortran/trans-expr.c:7915
0x677372 gfc_trans_init_assign(gfc_code*)
        /home/jweil/gcc48/trunk/gcc/fortran/trans-expr.c:7921



4.7 gives:

c0.f90:7.19:

    class(foo) this
                   1
Error: Component '_def_init' at (1) with coarray component shall be a
nonpointer, nonallocatable scalar
c0.f90:7.19:

    class(foo) this
                   1
Error: Variable 'dst' at (1) is INTENT(OUT) and can thus not be an allocatable
coarray or have coarray components
c0.f90:7.19:

    class(foo) this
                   1
Error: Component '_def_init' at (1) with coarray component shall be a
nonpointer, nonallocatable scalar