diff options
| author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-02-24 16:33:06 +0100 |
|---|---|---|
| committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-02-24 16:33:06 +0100 |
| commit | f64f6374c4b9db9f1111f272d842a625f0507ae6 (patch) | |
| tree | 2d37f9896459d286cba7660f4d5d7504deb636c7 /cparser | |
| parent | 26d2601818c387a540a7d89aec1363981f601b7e (diff) | |
| download | compcert-kvx-f64f6374c4b9db9f1111f272d842a625f0507ae6.tar.gz compcert-kvx-f64f6374c4b9db9f1111f272d842a625f0507ae6.zip | |
it now works, no more ugly hack to access thread local data
Diffstat (limited to 'cparser')
| -rw-r--r-- | cparser/Elab.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/cparser/Elab.ml b/cparser/Elab.ml index 42505a2c..3c754dd6 100644 --- a/cparser/Elab.ml +++ b/cparser/Elab.ml @@ -655,7 +655,7 @@ let rec elab_specifier ?(only = false) loc env specifier = restrict := cv = CV_RESTRICT; attr := add_attributes (elab_cvspec env cv) !attr | SpecStorage st -> - if !sto <> Storage_default && st <> TYPEDEF then + if !sto <> Storage_default && st <> TYPEDEF && st <> THREAD_LOCAL then error loc "multiple storage classes in declaration specifier"; begin match st with | AUTO -> sto := Storage_auto |