https://gcc.gnu.org/bugzilla/show_bug.cgi?id=70524
--- Comment #2 from Dominique d'Humieres <dominiq at lps dot ens.fr> --- > What is the gfc_warning* call that produces the ICE? Backtrace? For gfortran.dg/dependency_35.f90, the backtrace is /opt/gcc/_clean/gcc/testsuite/gfortran.dg/dependency_35.f90:6:0: pure function bar(i,j) in gfc_format_decoder, at fortran/error.c:937 ... frame #9: 0x0000000100ca2116 f951`fancy_abort(file=<unavailable>, line=<unavailable>, function=<unavailable>) + 38 at diagnostic.c:1329 frame #10: 0x00000001000313c4 f951`::gfc_format_decoder(pp=<unavailable>, text=<unavailable>, spec=<unavailable>, precision=<unavailable>, wide=<unavailable>, plus=<unavailable>, hash=false) + 244 at error.c:937 frame #11: 0x0000000100ca7012 f951`pp_format(pp=0x00000001424015e0, text=0x00007fff5fbfeb40) + 2274 at pretty-print.c:633 frame #12: 0x0000000100ca2831 f951`diagnostic_report_diagnostic(context=0x00000001416248c0, diagnostic=0x00007fff5fbfeb40) + 401 at diagnostic.c:825 frame #13: 0x00000001000310b9 f951`::gfc_warning(opt=174, gmsgid="Creating array temporary at %L", ap=<unavailable>) + 217 at error.c:794 frame #14: 0x0000000100031dd7 f951`gfc_warning(opt=<unavailable>, gmsgid=<unavailable>) + 135 at error.c:825 frame #15: 0x00000001000e185b f951`gfc_trans_dummy_array_bias(sym=0x0000000142704d00, tmpdesc=0x000000014215ba20, block=0x00007fff5fbff070) + 2571 at trans-array.c:6167 frame #16: 0x00000001000f7a7e f951`gfc_trans_deferred_vars(proc_sym=0x0000000142704d00, block=0x00007fff5fbff070) + 910 at trans-decl.c:4037 frame #17: 0x00000001000fa714 f951`gfc_generate_function_code(ns=<unavailable>) + 1332 at trans-decl.c:6258 frame #18: 0x00000001000d8322 f951`gfc_generate_module_code(ns=0x0000000144013400) + 370 at trans.c:2058 frame #19: 0x000000010008bbaf f951`gfc_parse_file() + 160 at parse.c:5600 frame #20: 0x000000010008bb0f f951`gfc_parse_file() + 1247 frame #21: 0x00000001000d1979 f951`::gfc_be_parse_file() + 57 at f95-lang.c:201 frame #22: 0x000000010099fa8c f951`::compile_file() + 60 at toplev.c:465 frame #23: 0x0000000100d879df f951`toplev::main(int, char**) + 1154 at toplev.c:1988 frame #24: 0x0000000100d8755d f951`toplev::main(this=<unavailable>, argc=<unavailable>, argv=<unavailable>) + 733 frame #25: 0x0000000100d893b9 f951`main(argc=4, argv=0x00007fff5fbff300) + 41 at main.c:39