diff options
| author | Thomas Schwinge <thomas@codesourcery.com> | 2017-05-19 15:32:19 +0200 |
|---|---|---|
| committer | Thomas Schwinge <tschwinge@gcc.gnu.org> | 2017-05-19 15:32:19 +0200 |
| commit | 9740ed54a6daf89d224a169d93412e6d821fad3c (patch) | |
| tree | f6d893cb0f914aafcc9e75a70fce7f7445a2d978 /gcc/cp | |
| parent | 0da2f96af06ef8254e87cab0cc4395aa512928f5 (diff) | |
| download | gcc-9740ed54a6daf89d224a169d93412e6d821fad3c.zip gcc-9740ed54a6daf89d224a169d93412e6d821fad3c.tar.gz gcc-9740ed54a6daf89d224a169d93412e6d821fad3c.tar.bz2 | |
OpenACC default clause maintenance
gcc/cp/
* parser.c (cp_parser_omp_clause_default): Avoid printing more
than one syntax error message.
gcc/testsuite/
* c-c++-common/goacc/default-1.c: New file.
* c-c++-common/goacc/default-2.c: Likewise.
* c-c++-common/goacc/data-default-1.c: Remove file, including its
test cases in...
* c-c++-common/goacc/default-3.c: ... this new file, and...
* c-c++-common/goacc/default-4.c: ... this new file.
* gfortran.dg/goacc/default.f95: Remove file, including its test
cases in...
* gfortran.dg/goacc/default-1.f95: ... this new file, and...
* gfortran.dg/goacc/default-2.f: ... this new file.
* gfortran.dg/goacc/default-3.f95: New file.
* gfortran.dg/goacc/default-4.f: Likewise.
From-SVN: r248278
Diffstat (limited to 'gcc/cp')
| -rw-r--r-- | gcc/cp/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/cp/parser.c | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/gcc/cp/ChangeLog b/gcc/cp/ChangeLog index 09c8269..c89f719 100644 --- a/gcc/cp/ChangeLog +++ b/gcc/cp/ChangeLog @@ -1,3 +1,8 @@ +2017-05-19 Thomas Schwinge <thomas@codesourcery.com> + + * parser.c (cp_parser_omp_clause_default): Avoid printing more + than one syntax error message. + 2017-05-19 Nathan Sidwell <nathan@acm.org> * class.c (class_dump_id): Define. diff --git a/gcc/cp/parser.c b/gcc/cp/parser.c index 7a87a5e..6453397 100644 --- a/gcc/cp/parser.c +++ b/gcc/cp/parser.c @@ -31504,7 +31504,8 @@ cp_parser_omp_clause_default (cp_parser *parser, tree list, cp_parser_error (parser, "expected %<none%> or %<shared%>"); } - if (!cp_parser_require (parser, CPP_CLOSE_PAREN, RT_CLOSE_PAREN)) + if (kind == OMP_CLAUSE_DEFAULT_UNSPECIFIED + || !cp_parser_require (parser, CPP_CLOSE_PAREN, RT_CLOSE_PAREN)) cp_parser_skip_to_closing_parenthesis (parser, /*recovering=*/true, /*or_comma=*/false, /*consume_paren=*/true); |