diff options
| author | Richard Henderson <rth@redhat.com> | 2006-10-09 09:27:14 -0700 |
|---|---|---|
| committer | Richard Henderson <rth@gcc.gnu.org> | 2006-10-09 09:27:14 -0700 |
| commit | a98d4769d5d5449e3ed3a524143b37e6c8a045ec (patch) | |
| tree | 3b365f54da686b951378eabd14acdaf98bd0eb15 /gcc/fortran/openmp.c | |
| parent | 5771bd91eccb16e766ed13f533bdb4695c705da7 (diff) | |
| download | gcc-a98d4769d5d5449e3ed3a524143b37e6c8a045ec.zip gcc-a98d4769d5d5449e3ed3a524143b37e6c8a045ec.tar.gz gcc-a98d4769d5d5449e3ed3a524143b37e6c8a045ec.tar.bz2 | |
Revert emutls patch.
From-SVN: r117578
Diffstat (limited to 'gcc/fortran/openmp.c')
| -rw-r--r-- | gcc/fortran/openmp.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c index 81faf49..09ec255 100644 --- a/gcc/fortran/openmp.c +++ b/gcc/fortran/openmp.c @@ -465,6 +465,12 @@ gfc_match_omp_threadprivate (void) if (m != MATCH_YES) return m; + if (!targetm.have_tls) + { + sorry ("threadprivate variables not supported in this target"); + goto cleanup; + } + for (;;) { m = gfc_match_symbol (&sym, 0); |