From 3179ebaeac5acfa6ec772a0b1a762215957fc6b0 Mon Sep 17 00:00:00 2001 From: Jakub Jelinek Date: Fri, 9 Nov 2018 21:20:53 +0100 Subject: [PATCH] c-parser.c (c_parser_omp_requires): Call sorry_at on requires clauses other than atomic_default_mem_order. * c-parser.c (c_parser_omp_requires): Call sorry_at on requires clauses other than atomic_default_mem_order. * parser.c (cp_parser_omp_requires): Call sorry_at on requires clauses other than atomic_default_mem_order. * c-c++-common/gomp/requires-1.c: Prune not supported yet messages. * c-c++-common/gomp/requires-2.c: Likewise. * c-c++-common/gomp/requires-4.c: Likewise. From-SVN: r265988 --- gcc/c/ChangeLog | 5 +++++ gcc/c/c-parser.c | 3 +++ gcc/cp/ChangeLog | 5 +++++ gcc/cp/parser.c | 3 +++ gcc/testsuite/ChangeLog | 4 ++++ gcc/testsuite/c-c++-common/gomp/requires-1.c | 2 ++ gcc/testsuite/c-c++-common/gomp/requires-2.c | 2 ++ gcc/testsuite/c-c++-common/gomp/requires-4.c | 2 ++ 8 files changed, 26 insertions(+) diff --git a/gcc/c/ChangeLog b/gcc/c/ChangeLog index 04f667ba157..aebce3cad48 100644 --- a/gcc/c/ChangeLog +++ b/gcc/c/ChangeLog @@ -1,3 +1,8 @@ +2018-11-09 Jakub Jelinek + + * c-parser.c (c_parser_omp_requires): Call sorry_at on requires + clauses other than atomic_default_mem_order. + 2018-11-08 Jakub Jelinek * c-parser.c: Include memmode.h. diff --git a/gcc/c/c-parser.c b/gcc/c/c-parser.c index 624d5a34c63..e330cd4b72d 100644 --- a/gcc/c/c-parser.c +++ b/gcc/c/c-parser.c @@ -19016,6 +19016,9 @@ c_parser_omp_requires (c_parser *parser) c_parser_skip_to_pragma_eol (parser, false); return; } + if (p) + sorry_at (cloc, "%qs clause on % directive not " + "supported yet", p); if (p) c_parser_consume_token (parser); if (this_req) diff --git a/gcc/cp/ChangeLog b/gcc/cp/ChangeLog index 7cb57b8bf3f..168edfe670c 100644 --- a/gcc/cp/ChangeLog +++ b/gcc/cp/ChangeLog @@ -1,3 +1,8 @@ +2018-11-09 Jakub Jelinek + + * parser.c (cp_parser_omp_requires): Call sorry_at on requires + clauses other than atomic_default_mem_order. + 2018-11-09 Martin Sebor PR middle-end/81824 diff --git a/gcc/cp/parser.c b/gcc/cp/parser.c index deaca5cc974..0bbd1563465 100644 --- a/gcc/cp/parser.c +++ b/gcc/cp/parser.c @@ -39234,6 +39234,9 @@ cp_parser_omp_requires (cp_parser *parser, cp_token *pragma_tok) cp_parser_skip_to_pragma_eol (parser, pragma_tok); return false; } + if (p) + sorry_at (cloc, "%qs clause on % directive not " + "supported yet", p); if (p) cp_lexer_consume_token (parser->lexer); if (this_req) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 0661f2f42a9..d2b915afddc 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,5 +1,9 @@ 2018-11-09 Jakub Jelinek + * c-c++-common/gomp/requires-1.c: Prune not supported yet messages. + * c-c++-common/gomp/requires-2.c: Likewise. + * c-c++-common/gomp/requires-4.c: Likewise. + * c-c++-common/gomp/lastprivate-conditional-1.c: New test. * c-c++-common/gomp/lastprivate-conditional-2.c: New test. diff --git a/gcc/testsuite/c-c++-common/gomp/requires-1.c b/gcc/testsuite/c-c++-common/gomp/requires-1.c index 7be6c382610..f1ec8e7a154 100644 --- a/gcc/testsuite/c-c++-common/gomp/requires-1.c +++ b/gcc/testsuite/c-c++-common/gomp/requires-1.c @@ -13,3 +13,5 @@ foo () i++; #pragma omp requries atomic_default_mem_order(seq_cst) } + +/* { dg-prune-output "not supported yet" } */ diff --git a/gcc/testsuite/c-c++-common/gomp/requires-2.c b/gcc/testsuite/c-c++-common/gomp/requires-2.c index d242a322028..ea07e763c55 100644 --- a/gcc/testsuite/c-c++-common/gomp/requires-2.c +++ b/gcc/testsuite/c-c++-common/gomp/requires-2.c @@ -16,3 +16,5 @@ foo () } #pragma omp requires atomic_default_mem_order (seq_cst) /* { dg-error "more than one 'atomic_default_mem_order' clause in a single compilation unit" } */ + +/* { dg-prune-output "not supported yet" } */ diff --git a/gcc/testsuite/c-c++-common/gomp/requires-4.c b/gcc/testsuite/c-c++-common/gomp/requires-4.c index a3497b141a3..37247a68c74 100644 --- a/gcc/testsuite/c-c++-common/gomp/requires-4.c +++ b/gcc/testsuite/c-c++-common/gomp/requires-4.c @@ -9,3 +9,5 @@ foo (void) #pragma omp requires unified_address /* { dg-error "'unified_address' clause used lexically after first target construct or offloading API" } */ #pragma omp requires reverse_offload /* { dg-error "'reverse_offload' clause used lexically after first target construct or offloading API" } */ + +/* { dg-prune-output "not supported yet" } */ -- 2.30.2