diff options
| author | Jakub Jelinek <jakub@redhat.com> | 2019-11-14 09:14:16 +0100 |
|---|---|---|
| committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2019-11-14 09:14:16 +0100 |
| commit | bedb7f045f3bc4ccf17f4b58f840c93acb821a3f (patch) | |
| tree | fcccc411bdf6e64e0876f3eeeb76ff8b773b0243 /gcc/cp/parser.c | |
| parent | d0ec7c935f0c961b13f75c906b8621e35ce1ace5 (diff) | |
| download | gcc-bedb7f045f3bc4ccf17f4b58f840c93acb821a3f.zip gcc-bedb7f045f3bc4ccf17f4b58f840c93acb821a3f.tar.gz gcc-bedb7f045f3bc4ccf17f4b58f840c93acb821a3f.tar.bz2 | |
c-parser.c (c_parser_omp_context_selector): Don't require score argument to fit into shwi, just to be INTEGER_CST.
* c-parser.c (c_parser_omp_context_selector): Don't require score
argument to fit into shwi, just to be INTEGER_CST. Diagnose
negative score.
* parser.c (cp_parser_omp_context_selector): Don't require score
argument to fit into shwi, just to be INTEGER_CST. Diagnose
negative score.
* pt.c (tsubst_attribute): Likewise.
* c-c++-common/gomp/declare-variant-2.c: Add test for non-integral
score and for negative score.
* c-c++-common/gomp/declare-variant-3.c: Add test for zero score.
* g++.dg/gomp/declare-variant-8.C: Add test for negative and zero
scores.
From-SVN: r278204
Diffstat (limited to 'gcc/cp/parser.c')
| -rw-r--r-- | gcc/cp/parser.c | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/gcc/cp/parser.c b/gcc/cp/parser.c index be29a27..c473e7f 100644 --- a/gcc/cp/parser.c +++ b/gcc/cp/parser.c @@ -40565,11 +40565,16 @@ cp_parser_omp_context_selector (cp_parser *parser, tree set, bool has_parms_p) if (score != error_mark_node) { score = fold_non_dependent_expr (score); - if (!value_dependent_expression_p (score) - && (!INTEGRAL_TYPE_P (TREE_TYPE (score)) - || !tree_fits_shwi_p (score))) + if (value_dependent_expression_p (score)) + properties = tree_cons (get_identifier (" score"), + score, properties); + else if (!INTEGRAL_TYPE_P (TREE_TYPE (score)) + || TREE_CODE (score) != INTEGER_CST) error_at (token->location, "score argument must be " "constant integer expression"); + else if (tree_int_cst_sgn (score) < 0) + error_at (token->location, "score argument must be " + "non-negative"); else properties = tree_cons (get_identifier (" score"), score, properties); |