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

G. Steinmetz <gs...@t-online.de> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |gs...@t-online.de

--- Comment #2 from G. Steinmetz <gs...@t-online.de> ---

One possible simplification might be this legal code :


$ cat z1.f90
module m
   type t
   contains
      final :: g
   end type
   type t2
      type(t) :: a
      type(t2), allocatable :: b(:)
   end type
contains
   subroutine g(x)
      type(t) :: x
   end
end


$ gfortran-10-20190825 -c z1.f90
during RTL pass: expand
z1.f90:14:0:

   14 | end
      |
internal compiler error: Segmentation fault
0xb3acef crash_signal
        ../../gcc/toplev.c:326
0x87d5ca expand_expr_real(tree_node*, rtx_def*, machine_mode, expand_modifier,
rtx_def**, bool)
        ../../gcc/expr.c:8273
0x78393e expand_expr
        ../../gcc/expr.h:281
0x78393e expand_call_stmt
        ../../gcc/cfgexpand.c:2731
0x78393e expand_gimple_stmt_1
        ../../gcc/cfgexpand.c:3710
0x78393e expand_gimple_stmt
        ../../gcc/cfgexpand.c:3875
0x7884c7 expand_gimple_basic_block
        ../../gcc/cfgexpand.c:5915
0x78ab66 execute
        ../../gcc/cfgexpand.c:6538

Reply via email to