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

Thomas Koenig <tkoenig at gcc dot gnu.org> changed:

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

--- Comment #9 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
Here's where it segfaults with 7.4.0:

(gdb) r
Starting program: /usr/lib/gcc/x86_64-pc-cygwin/7.4.0/f951.exe tst.f
-ffixed-form -quiet -dumpbase tst.f -mtune=generic -march=x86-64 -auxbase tst
-g -ffpe-trap=zero,overflow,underflow -fdollar-ok -fintrinsic-modules-path
/usr/lib/gcc/x86_64-pc-cygwin/7.4.0/finclude -o /tmp/ccuPm0Se.s
[New Thread 12104.0x2468]
[New Thread 12104.0x2650]
[New Thread 12104.0x2e74]
[New Thread 12104.0x2600]
[New Thread 12104.0x2368]

Thread 1 received signal SIGSEGV, Segmentation fault.
0x00000001004fcf20 in build_common_decl (is_init=false, union_type=<optimized
out>, com=0x6001e8870) at
/usr/src/debug/gcc-7.4.0-1/gcc/fortran/trans-common.c:463
463           attributes = gfc_add_attributes_to_decl (com->head->attr,
NULL_TREE);
(gdb) p com
$1 = (gfc_common_head *) 0x6001e8870
(gdb) p com->head
$2 = (gfc_symbol *) 0x0

$4 = {where = {nextc = 0x6000d6a60, lb = 0x6000d6a10}, use_assoc = 0 '\000',
saved = 0 '\000', threadprivate = 0 '\000', omp_declare_target = 0 '\000',
omp_declare_target_link = 0 '\000', name = "__BLNK__", '\000' <repeats 55
times>, head = 0x0, binding_label = 0x0,
  is_bind_c = 0, refs = 0}

Backtrace:

#0  0x00000001004fcf20 in build_common_decl (is_init=false,
union_type=<optimized out>, com=0x6001e8870) at
/usr/src/debug/gcc-7.4.0-1/gcc/fortran/trans-common.c:463
#1  create_common (com=com@entry=0x6001e8870, head=head@entry=0x60020bff0,
saw_equiv=<optimized out>) at
/usr/src/debug/gcc-7.4.0-1/gcc/fortran/trans-common.c:672
#2  0x00000001004fd4c9 in translate_common (common=0x6001e8870,
var_list=<optimized out>) at
/usr/src/debug/gcc-7.4.0-1/gcc/fortran/trans-common.c:1213
#3  0x00000001004fd6d0 in gfc_trans_common (ns=ns@entry=0x60017dc10) at
/usr/src/debug/gcc-7.4.0-1/gcc/fortran/trans-common.c:1300
#4  0x000000010050aac4 in gfc_generate_function_code (ns=0x60017dc10) at
/usr/src/debug/gcc-7.4.0-1/gcc/fortran/trans-decl.c:6235
#5  0x00000001004983af in translate_all_program_units
(gfc_global_ns_list=<optimized out>) at
/usr/src/debug/gcc-7.4.0-1/gcc/fortran/parse.c:6075
#6  gfc_parse_file () at /usr/src/debug/gcc-7.4.0-1/gcc/fortran/parse.c:6275
#7  0x00000001004df32b in gfc_be_parse_file () at
/usr/src/debug/gcc-7.4.0-1/gcc/fortran/f95-lang.c:204
#8  0x00000001008fd8ac in compile_file () at
/usr/src/debug/gcc-7.4.0-1/gcc/toplev.c:467
#9  0x00000001010e7b8d in do_compile () at
/usr/src/debug/gcc-7.4.0-1/gcc/toplev.c:2003
#10 toplev::main (this=this@entry=0xffffca46, argc=<optimized out>,
argc@entry=17, argv=<optimized out>, argv@entry=0xffffcac0) at
/usr/src/debug/gcc-7.4.0-1/gcc/toplev.c:2138
#11 0x0000000101107545 in main (argc=17, argv=0xffffcac0) at
/usr/src/debug/gcc-7.4.0-1/gcc/main.c:39

Reply via email to