https://gcc.gnu.org/bugzilla/show_bug.cgi?id=126058
Steve Kargl <kargl at gcc dot gnu.org> changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |kargl at gcc dot gnu.org
--- Comment #1 from Steve Kargl <kargl at gcc dot gnu.org> ---
(In reply to Michal Jireš from comment #0)
> Compiling reduced testcase gfortran.dg/pr109662.f90 ICEs since
> r17-1502-g9d868e49122b4c during unused warning printing.
>
> $ cat pr109662.f90
> program foo
> namelist/stuff/n
> n = 0
> read(list,stuff)
> end program foo
>
>
> $ gfortran pr109662.f90 -Wunused
>
> in gfc_get_location_with_offset, at fortran/error.cc:68
> 0x26eacc1 internal_error(char const*, ...)
> /home/mjires/git/GCC/master/gcc/diagnostic-global-context.cc:787
> 0x26f6a63 fancy_abort(char const*, int, char const*)
> /home/mjires/git/GCC/master/gcc/diagnostics/context.cc:1813
> 0x86f9e7 gfc_get_location_with_offset(locus*, unsigned int)
> /home/mjires/git/GCC/master/gcc/fortran/error.cc:68
> 0x86fa5e gfc_format_decoder
> /home/mjires/git/GCC/master/gcc/fortran/error.cc:435
> 0x275e31c format_phase_2
> /home/mjires/git/GCC/master/gcc/pretty-print.cc:2303
> 0x275e31c pretty_printer::format(text_info&)
> /home/mjires/git/GCC/master/gcc/pretty-print.cc:1846
> 0x26f8e81 pp_format(pretty_printer*, text_info*)
> /home/mjires/git/GCC/master/gcc/pretty-print.h:599
> 0x26f8e81
> diagnostics::context::report_diagnostic(diagnostics::diagnostic_info*)
> /home/mjires/git/GCC/master/gcc/diagnostics/context.cc:1530
> 0x86f2b9 diagnostic_report_diagnostic(diagnostics::context*,
> diagnostics::diagnostic_info*)
> /home/mjires/git/GCC/master/gcc/diagnostic.h:178
> 0x86f2b9 gfc_report_diagnostic
> /home/mjires/git/GCC/master/gcc/fortran/error.cc:251
> 0x870e45 gfc_warning
> /home/mjires/git/GCC/master/gcc/fortran/error.cc:278
> 0x870f55 gfc_warning(int, char const*, ...)
> /home/mjires/git/GCC/master/gcc/fortran/error.cc:295
> 0x8f2dac find_unused_vs_set
> /home/mjires/git/GCC/master/gcc/fortran/resolve.cc:20946
> 0x92571c do_traverse_symtree
(gdb) p *sym->name
$6 = 110 'n'
(gdb) p sym->other_loc
$7 = {nextc = 0x0, u = {lb = 0x0, location = 0}}
NULL pointer dereference.
