https://gcc.gnu.org/bugzilla/show_bug.cgi?id=93956
--- Comment #3 from martin <mscfd at gmx dot net> --- Sorry, indeed the line 'n=10000' is missing. Not sure how that single line got lost. There are a few possibilities as a work around for this simple case, but the context where I came upon this bug is (as often) more involved. There the get routine has an additional argument selecting the component of the type and the aim was to put this selection process into a separate subroutine or function.