[Bug fortran/56386] New: ICE with ASSOCIATE construct and an derived type array component

[Bug fortran/56386] New: ICE with ASSOCIATE construct and an derived type array component

[vladimir.fuka at gmail dot com]

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

             Bug #: 56386
           Summary: ICE with ASSOCIATE construct and an derived type array
                    component
    Classification: Unclassified
           Product: gcc
           Version: 4.8.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: vladimir.fuka@gmail.com


Created attachment 29489
  --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=29489
reproduction case source

The attached source causes an ICE with GCC-4.6, GCC-4.7 and GCC-4.8

> gfortran ice.f90 -c -v
Using built-in specs.
COLLECT_GCC=gfortran
Target: x86_64-unknown-linux-gnu
Configured with: ../gcc-4.8-20130217/configure --enable-languages=c,c++,fortran
--prefix=/usr/local/gcc-4.8
Thread model: posix
gcc version 4.8.0 20130217 (experimental) (GCC) 
COLLECT_GCC_OPTIONS='-c' '-v' '-mtune=generic' '-march=x86-64'
 /usr/local/gcc-4.8/lib/gcc/x86_64-unknown-linux-gnu/4.8.0/f951 ice.f90 -quiet
-dumpbase ice.f90 -mtune=generic -march=x86-64 -auxbase ice -version
-fintrinsic-modules-path
/usr/local/gcc-4.8/lib64/gcc/x86_64-unknown-linux-gnu/4.8.0/finclude -o
/tmp/ccc6FYBT.s
GNU Fortran (GCC) version 4.8.0 20130217 (experimental)
(x86_64-unknown-linux-gnu)
        compiled by GNU C version 4.8.0 20130217 (experimental), GMP version
5.0.5, MPFR version 3.1.0-p1, MPC version 0.8.2
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
GNU Fortran (GCC) version 4.8.0 20130217 (experimental)
(x86_64-unknown-linux-gnu)
        compiled by GNU C version 4.8.0 20130217 (experimental), GMP version
5.0.5, MPFR version 3.1.0-p1, MPC version 0.8.2
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
ice.f90: In function ‘customsolidbodies’:
ice.f90:15:0: internal compiler error: in gfc_conv_component_ref, at
fortran/trans-expr.c:1574
        PrTer%elev=0
 ^
0x5e5ac3 gfc_conv_component_ref
        ../../gcc-4.8-20130217/gcc/fortran/trans-expr.c:1574
0x5f2721 gfc_conv_variable
        ../../gcc-4.8-20130217/gcc/fortran/trans-expr.c:1817
0x5ef1da gfc_conv_expr(gfc_se*, gfc_expr*)
        ../../gcc-4.8-20130217/gcc/fortran/trans-expr.c:6266
0x5f55cc gfc_trans_assignment_1
        ../../gcc-4.8-20130217/gcc/fortran/trans-expr.c:7754
0x5bc331 trans_code
        ../../gcc-4.8-20130217/gcc/fortran/trans.c:1422
0x619e18 gfc_trans_block_construct(gfc_code*)
        ../../gcc-4.8-20130217/gcc/fortran/trans-stmt.c:1342
0x5bc0e7 trans_code
        ../../gcc-4.8-20130217/gcc/fortran/trans.c:1527
0x5e312e gfc_generate_function_code(gfc_namespace*)
        ../../gcc-4.8-20130217/gcc/fortran/trans-decl.c:5395
0x57c360 translate_all_program_units
        ../../gcc-4.8-20130217/gcc/fortran/parse.c:4468
0x57c360 gfc_parse_file()
        ../../gcc-4.8-20130217/gcc/fortran/parse.c:4682
0x5b79f5 gfc_be_parse_file
        ../../gcc-4.8-20130217/gcc/fortran/f95-lang.c:189
Please submit a full bug report,
with preprocessed source if appropriate.
Please include the complete backtrace with any bug report.
See <http://gcc.gnu.org/bugs.html> for instructions.

[Bug fortran/56386] [F03] ICE with ASSOCIATE construct and an derived type array component

[janus at gcc dot gnu.org]

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

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-valid-code
                 CC|                            |janus at gcc dot gnu.org
            Summary|ICE with ASSOCIATE          |[F03] ICE with ASSOCIATE
                   |construct and an derived    |construct and an derived
                   |type array component        |type array component

--- Comment #1 from janus at gcc dot gnu.org 2013-02-18 22:46:23 UTC ---
Confirmed. ICEs with all of 4.6, 4.7 and trunk.

[Bug fortran/56386] [F03] ICE with ASSOCIATE construct and an derived type array component

[burnus at gcc dot gnu.org]

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

Tobias Burnus <burnus at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |rejects-valid
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2013-04-16
                 CC|                            |burnus at gcc dot gnu.org
     Ever Confirmed|0                           |1

--- Comment #2 from Tobias Burnus <burnus at gcc dot gnu.org> 2013-04-16 17:17:52 UTC ---
Related test case by the bug reporterm
https://groups.google.com/forum/?fromgroups=#!topic/comp.lang.fortran/UvBX1kfuFqs


This time rejecting the code instead of ICEing:

   print *,x%i
             1
Error: Symbol 'x' at (1) has no IMPLICIT type



program p
  type t
    integer :: i = 0
  end type

  associate (x=>f())
    print *,x%i
  end associate

  contains
    function f()
      type(t) f
      f%i = 5
    end function
end program

[Bug fortran/56386] [F03] ICE with ASSOCIATE construct and an derived type array component

[vladimir.fuka at gmail dot com]

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

--- Comment #3 from Vladimir Fuka <vladimir.fuka at gmail dot com> 2013-04-16 17:40:04 UTC ---
Thanks, I didn't realize they might be connected. I even forgotten I have
this bug opened when I asked.

  Vladimir
Dne 16.4.2013 19:17 "burnus at gcc dot gnu.org" <gcc-bugzilla@gcc.gnu.org>
napsal(a):

>
> http://gcc.gnu.org/bugzilla/show_bug.cgi?id=56386
>
> Tobias Burnus <burnus at gcc dot gnu.org> changed:
>
>            What    |Removed                     |Added
>
> ----------------------------------------------------------------------------
>            Keywords|                            |rejects-valid
>              Status|UNCONFIRMED                 |NEW
>    Last reconfirmed|                            |2013-04-16
>                  CC|                            |burnus at gcc dot gnu.org
>      Ever Confirmed|0                           |1
>
> --- Comment #2 from Tobias Burnus <burnus at gcc dot gnu.org> 2013-04-16
> 17:17:52 UTC ---
> Related test case by the bug reporterm
>
> https://groups.google.com/forum/?fromgroups=#!topic/comp.lang.fortran/UvBX1kfuFqs
>
>
> This time rejecting the code instead of ICEing:
>
>    print *,x%i
>              1
> Error: Symbol 'x' at (1) has no IMPLICIT type
>
>
>
> program p
>   type t
>     integer :: i = 0
>   end type
>
>   associate (x=>f())
>     print *,x%i
>   end associate
>
>   contains
>     function f()
>       type(t) f
>       f%i = 5
>     end function
> end program
>
> --
> Configure bugmail: http://gcc.gnu.org/bugzilla/userprefs.cgi?tab=email
> ------- You are receiving this mail because: -------
> You are on the CC list for the bug.
> You reported the bug.
>

[Bug fortran/56386] [F03] ICE with ASSOCIATE construct and an derived type array component

[dominiq at lps dot ens.fr]

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

--- Comment #4 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
pr64674 is likely a duplicate of this pr.