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

[jakub at gcc dot gnu.org]

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

--- Comment #14 from Jakub Jelinek <jakub at gcc dot gnu.org> ---
Author: jakub
Date: Thu Nov 23 20:16:38 2017
New Revision: 255115

URL: https://gcc.gnu.org/viewcvs?rev=255115&root=gcc&view=rev
Log:
        PR fortran/81841
        * parse.c (parse_spec): Allow ST_OMP_THREADPRIVATE inside of
        BLOCK DATA.

        * libgomp.fortran/pr81841.f90: New test.

Added:
    trunk/libgomp/testsuite/libgomp.fortran/pr81841.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/parse.c
    trunk/libgomp/ChangeLog