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

            Bug ID: 83021
           Summary: [7 Regression] gfortran segfault
           Product: gcc
           Version: 8.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: doko at gcc dot gnu.org
  Target Milestone: ---

Created attachment 42622
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=42622&action=edit
test case

[forwarded from https://bugs.debian.org/881918]

seen building open-coarrays with the gcc-7-branch 20171115, not seen on the
branch 20171001

$ gfortran global_field.f90 -fcoarray=lib
global_field.f90:126:0:

     lhs%values(:) = rhs%state()

internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.

Program received signal SIGSEGV, Segmentation fault.
0x000000000067a16f in gfc_walk_array_ref(gfc_ss*, gfc_expr*, gfc_ref*) ()
(gdb) bt
#0  0x000000000067a16f in gfc_walk_array_ref(gfc_ss*, gfc_expr*, gfc_ref*) ()
#1  0x000000000067cf7a in gfc_conv_expr_descriptor(gfc_se*, gfc_expr*) ()
#2  0x00000000006a6572 in ?? ()
#3  0x00000000006b9814 in gfc_conv_intrinsic_function(gfc_se*, gfc_expr*) ()
#4  0x00000000006a0895 in ?? ()
#5  0x0000000000696a3b in gfc_apply_interface_mapping(gfc_interface_mapping*,
gfc_se*, gfc_expr*) ()
#6  0x000000000066ee45 in
gfc_set_loop_bounds_from_array_spec(gfc_interface_mapping*, gfc_se*,
gfc_array_spec*) ()
#7  0x000000000069f37e in gfc_conv_procedure_call(gfc_se*, gfc_symbol*,
gfc_actual_arglist*, gfc_expr*, vec<tree_node*, va_gc, vl_embed>*) ()
#8  0x00000000006a087d in ?? ()
#9  0x000000000067c239 in ?? ()
#10 0x000000000067cdf6 in gfc_conv_loop_setup(gfc_loopinfo*, locus*) ()
#11 0x00000000006a32e0 in ?? ()
#12 0x0000000000668b10 in ?? ()
#13 0x000000000068de98 in gfc_generate_function_code(gfc_namespace*) ()
#14 0x000000000066c86a in gfc_generate_module_code(gfc_namespace*) ()
#15 0x000000000062229c in gfc_parse_file() ()
#16 0x0000000000665630 in ?? ()
#17 0x0000000000a7ac6f in ?? ()
#18 0x000000000059923a in toplev::main(int, char**) ()
#19 0x000000000059b5eb in main ()

Reply via email to