[Bug fortran/107421] New: problematic interaction of 'common' and 'threadprivate'

[Bug fortran/107421] New: problematic interaction of 'common' and 'threadprivate'

[amonakov at gcc dot gnu.org]

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

            Bug ID: 107421
           Summary: problematic interaction of 'common' and
                    'threadprivate'
           Product: gcc
           Version: 13.0
            Status: UNCONFIRMED
          Keywords: openmp
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: amonakov at gcc dot gnu.org
                CC: amonakov at gcc dot gnu.org, asolokha at gmx dot com,
                    bergner at gcc dot gnu.org, iains at gcc dot gnu.org,
                    law at gcc dot gnu.org, marxin at gcc dot gnu.org,
                    segher at gcc dot gnu.org, seurer at gcc dot gnu.org,
                    unassigned at gcc dot gnu.org
            Blocks: 107353
  Target Milestone: ---

+++ This bug was initially created as a clone of Bug #107353 +++

integer :: i

common /c/ i

!$omp threadprivate (/c/)

i = 0

end

f951 -fopenmp invokes decl_default_tls_model before assigning DECL_COMMON in
fortran/trans-common.cc:build_common_decl. This causes 'c' to have local-exec
model rather than initial-exec, breaking internal verification that was
weakened to solve PR 107353.


Referenced Bugs:

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=107353
[Bug 107353] [13 regression] Numerous ICEs after r13-3416-g1d561e1851c466