diff options
| author | Thomas Koenig <tkoenig@gcc.gnu.org> | 2018-09-02 20:10:58 +0000 |
|---|---|---|
| committer | Thomas Koenig <tkoenig@gcc.gnu.org> | 2018-09-02 20:10:58 +0000 |
| commit | 6857bd99f3922f57dd94aaf675c0cb5f0dcfd24b (patch) | |
| tree | 7cdf3a1e38e2ccfa63060af300a6097d2efb3cf7 /libgfortran/runtime/compile_options.c | |
| parent | 8d3339526af25cd65f0d99ba6d2a05b37b61e1d0 (diff) | |
| download | gcc-devel/gfortran-caf.tar.gz | |
multi.c: Remove static variables _gfortrani_caf_this_image and caf_num_images.devel/gfortran-caf
2018-09-02 Thomas Koenig <tkoenig@gcc.gnu.org>
* caf/multi.c: Remove static variables _gfortrani_caf_this_image
and caf_num_images.
* runtime/environ.c: Add caf_num_images.
* runtime/compile_options.c: Add _gfortrani_caf_this_image.
From-SVN: r264045
Diffstat (limited to 'libgfortran/runtime/compile_options.c')
| -rw-r--r-- | libgfortran/runtime/compile_options.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/libgfortran/runtime/compile_options.c b/libgfortran/runtime/compile_options.c index ef8777e1505..8b46a9c10f3 100644 --- a/libgfortran/runtime/compile_options.c +++ b/libgfortran/runtime/compile_options.c @@ -142,6 +142,10 @@ backtrace_handler (int signum) extern void set_options (int , int []); export_proto(set_options); +/* Thread-local storage which image we are in. */ + +__thread int _gfortrani_caf_this_image = -1; + void set_options (int num, int options[]) { |