https://gcc.gnu.org/bugzilla/show_bug.cgi?id=115260
--- Comment #3 from anlauf at gcc dot gnu.org ---
(In reply to anlauf from comment #2)
> Created attachment 58346 [details]
> Reduced testcase
>
> Reduced for subsequent analysis.
Further datapoint: replacing the dummy argument
type(field_type), intent(inout) :: fieldset(1:4)
by
type(field_type), contiguous :: fieldset( : )
always leads to corruption.
