[Bug fortran/64589] Linking error due to undefined integer symbol with unlimited polymorphism

[Bug fortran/64589] Linking error due to undefined integer symbol with unlimited polymorphism

[janus at gcc dot gnu.org]

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

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-valid-code
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2015-01-14
                 CC|                            |janus at gcc dot gnu.org
     Ever confirmed|0                           |1

--- Comment #1 from janus at gcc dot gnu.org ---
Confirmed. I get an ICE on this variant:


module m
contains
  subroutine fmt()
    class(*), pointer :: arg
    select type (arg)
    type is (integer)
    end select
  end subroutine
end module

program p
contains
  subroutine makeString(arg1)
    class(*) :: arg1
  end subroutine 
  subroutine getSuffix()
    use m
    call makeString(1)
  end subroutine
end



 program p
 1
internal compiler error: in build_function_decl, bei fortran/trans-decl.c:1985
0x694062 build_function_decl
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-decl.c:1982
0x69ac6e gfc_get_symbol_decl(gfc_symbol*)
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-decl.c:1469
0x6aba97 gfc_conv_variable
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-expr.c:2008
0x6a7f22 gfc_conv_expr(gfc_se*, gfc_expr*)
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-expr.c:6617
0x6aa56a gfc_conv_initializer(gfc_expr*, gfc_typespec*, tree_node*, bool, bool,
bool)
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-expr.c:5990
0x6aa85c gfc_conv_structure(gfc_se*, gfc_expr*, int)
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-expr.c:6508
0x6aa672 gfc_conv_initializer(gfc_expr*, gfc_typespec*, tree_node*, bool, bool,
bool)
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-expr.c:6005
0x69a9c0 gfc_get_symbol_decl(gfc_symbol*)
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-decl.c:1603
0x6ad21e gfc_conv_intrinsic_to_class(gfc_se*, gfc_expr*, gfc_typespec)
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-expr.c:581
0x6a4431 gfc_conv_procedure_call(gfc_se*, gfc_symbol*, gfc_actual_arglist*,
gfc_expr*, vec<tree_node*, va_gc, vl_embed>*)
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-expr.c:4273
0x6d476e gfc_trans_call(gfc_code*, bool, tree_node*, tree_node*, bool)
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-stmt.c:419
0x67cdae trans_code
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans.c:1728
0x69da5f gfc_generate_function_code(gfc_namespace*)
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-decl.c:5807
0x69dd57 gfc_generate_contained_functions
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-decl.c:4946
0x69dd57 gfc_generate_function_code(gfc_namespace*)
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/trans-decl.c:5738
0x639eb0 translate_all_program_units
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/parse.c:4947
0x639eb0 gfc_parse_file()
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/parse.c:5144
0x678ba5 gfc_be_parse_file
    /home/jweil/gcc/gcc50/trunk/gcc/fortran/f95-lang.c:228

[Bug fortran/64589] [OOP] Linking error due to undefined integer symbol with unlimited polymorphism

[damian at sourceryinstitute dot org]

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

--- Comment #2 from Damian Rouson <damian at sourceryinstitute dot org> ---
Any updates on this bug report?

[Bug fortran/64589] [OOP] Linking error due to undefined integer symbol with unlimited polymorphism

[vehre at gcc dot gnu.org]

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

vehre at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |WAITING
                 CC|                            |vehre at gcc dot gnu.org

--- Comment #3 from vehre at gcc dot gnu.org ---
Works with current trunk as of r224477. Please cross check!

[Bug fortran/64589] [OOP] Linking error due to undefined integer symbol with unlimited polymorphism

[dominiq at lps dot ens.fr]

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

--- Comment #4 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
> Works with current trunk as of r224477. Please cross check!

Not for me at r224485 (clean):

[Book15] f90/bug% gfc pr64589.f90
Undefined symbols for architecture x86_64:
  "___vtab_INTEGER_4_.3443", referenced from:
      ___astg_mpifilehandler_mod_MOD_getsuffix in ccsS2B1M.o
...
[Book15] f90/bug% gfc pr64589_1.f90
pr64589_1.f90:11:0:

 program p
1
internal compiler error: in build_function_decl, at fortran/trans-decl.c:2046
...

[Bug fortran/64589] [OOP] Linking error due to undefined integer symbol with unlimited polymorphism

[vehre at gcc dot gnu.org]

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

--- Comment #5 from vehre at gcc dot gnu.org ---
Author: vehre
Date: Mon Jul 13 09:01:54 2015
New Revision: 225730

URL: https://gcc.gnu.org/viewcvs?rev=225730&root=gcc&view=rev
Log:
gcc/testsuite/ChangeLog:

2015-07-13  Andre Vehreschild  <vehre@gcc.gnu.org>

        PR fortran/64589
        * gfortran.dg/pr64589.f90: New test.


gcc/fortran/ChangeLog:

2015-07-13  Andre Vehreschild  <vehre@gcc.gnu.org>

        PR fortran/64589
        * class.c (find_intrinsic_vtab): Put/Search vtabs for intrinsic
        types in the top-level namespace.


Added:
    trunk/gcc/testsuite/gfortran.dg/pr64589.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/class.c
    trunk/gcc/testsuite/ChangeLog

[Bug fortran/64589] [OOP] Linking error due to undefined integer symbol with unlimited polymorphism

[vehre at gcc dot gnu.org]

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

vehre at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|WAITING                     |RESOLVED
         Resolution|---                         |FIXED

--- Comment #6 from vehre at gcc dot gnu.org ---
Fixed, closing.