[Bug fortran/81841] [5/6/7/8 Regression] THREADPRIVATE (OpenMP) wrongly rejected in BLOCK DATA

[janus at gcc dot gnu.org]

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

--- Comment #9 from janus at gcc dot gnu.org ---
(In reply to dbroemmel from comment #8)
> (In reply to janus from comment #7)
> > Sounds unrelated to your patch (supported by the fact that the 6.2 testsuite
> > runs cleanly), however I haven't seen that failure on trunk recently.
> That's what I thought as well.
> 
> > Maybe you can check if it also occurs without the patch on your machine
> > (i.e. with a clean trunk)?
> It wasn't a clean trunk but the single line commented

Clean enough ;)


> and it still shows the same unexpected failure.

This seems to be PR 81018 (which translates into "not your fault").


> I can run more tests if you tell me which ones.

I'm happy for now. Backed by your OpenMP quotes, the patch looks pretty solid
to me.

Do you feel confident enough to turn your small example into a dejagnu test
case to be committed along with the patch? We'll also need a short ChangeLog
entry for both.