[Bug fortran/58904] ICE: accessing a component field of an unavailable type results in a seg fault

[janus at gcc dot gnu.org]

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

--- Comment #4 from janus at gcc dot gnu.org ---
(In reply to janus from comment #3)
> Draft patch:

Unfortunately this causes several regressions in the testsuite:

FAIL: gfortran.dg/asynchronous_1.f90   -O   (test for errors, line 35)
FAIL: gfortran.dg/asynchronous_1.f90   -O   (test for errors, line 36)
FAIL: gfortran.dg/asynchronous_1.f90   -O   (test for errors, line 40)
FAIL: gfortran.dg/asynchronous_1.f90   -O   (test for errors, line 41)
FAIL: gfortran.dg/asynchronous_1.f90   -O  (test for excess errors)
FAIL: gfortran.dg/class_result_4.f90   -O   (test for errors, line 3)
FAIL: gfortran.dg/class_result_4.f90   -O   (test for errors, line 4)
FAIL: gfortran.dg/class_result_4.f90   -O  (test for excess errors)
FAIL: gfortran.dg/derived_external_function_1.f90   -O0  (test for excess
errors)
FAIL: gfortran.dg/derived_external_function_1.f90   -O1  (test for excess
errors)
FAIL: gfortran.dg/derived_external_function_1.f90   -O2  (test for excess
errors)
FAIL: gfortran.dg/derived_external_function_1.f90   -O3 -fomit-frame-pointer
-funroll-loops -fpeel-loops -ftracer -finline-functions  (test for excess
errors)
FAIL: gfortran.dg/derived_external_function_1.f90   -O3 -g  (test for excess
errors)
FAIL: gfortran.dg/derived_external_function_1.f90   -Os  (test for excess
errors)
FAIL: gfortran.dg/derived_function_interface_1.f90   -O   (test for errors,
line 41)
FAIL: gfortran.dg/derived_function_interface_1.f90   -O   (test for errors,
line 42)
FAIL: gfortran.dg/derived_function_interface_1.f90   -O  (test for excess
errors)
FAIL: gfortran.dg/func_result_5.f90   -O  (test for excess errors)
FAIL: gfortran.dg/function_types_1.f90   -O   (test for errors, line 9)
FAIL: gfortran.dg/function_types_1.f90   -O  (test for excess errors)
FAIL: gfortran.dg/function_types_2.f90   -O  (test for excess errors)
FAIL: gfortran.dg/function_types_3.f90   -O   (test for errors, line 8)
FAIL: gfortran.dg/function_types_3.f90   -O   (test for errors, line 17)
FAIL: gfortran.dg/function_types_3.f90   -O   (test for errors, line 18)
FAIL: gfortran.dg/function_types_3.f90   -O  (test for excess errors)
FAIL: gfortran.dg/func_derived_5.f90   -O  (test for excess errors)
FAIL: gfortran.dg/function_kinds_1.f90   -O0  (test for excess errors)
FAIL: gfortran.dg/function_kinds_1.f90   -O1  (test for excess errors)
FAIL: gfortran.dg/function_kinds_1.f90   -O2  (test for excess errors)
FAIL: gfortran.dg/function_kinds_1.f90   -O3 -fomit-frame-pointer
-funroll-loops -fpeel-loops -ftracer -finline-functions  (test for excess
errors)
FAIL: gfortran.dg/function_kinds_1.f90   -O3 -g  (test for excess errors)
FAIL: gfortran.dg/function_kinds_1.f90   -Os  (test for excess errors)
FAIL: gfortran.dg/function_kinds_2.f90   -O   (test for errors, line 16)
FAIL: gfortran.dg/function_kinds_2.f90   -O  (test for excess errors)