1 files changed, 30 insertions, 0 deletions
diff --git a/gcc/testsuite/c-c++-common/gomp/defaultmap-1.c b/gcc/testsuite/c-c++-common/gomp/defaultmap-1.c
new file mode 100644
index 00000000000..80a111cc114
--- /dev/null
+++ b/gcc/testsuite/c-c++-common/gomp/defaultmap-1.c
@@ -0,0 +1,30 @@
+void
+foo (void)
+{
+  #pragma omp target defaultmap(alloc) defaultmap(alloc)	/* { dg-error "too many 'defaultmap' clauses with unspecified category" } */
+  ;
+  #pragma omp target defaultmap(to) defaultmap(from)		/* { dg-error "too many 'defaultmap' clauses with unspecified category" } */
+  ;
+  #pragma omp target defaultmap(tofrom) defaultmap(firstprivate:scalar)	/* { dg-error "too many 'defaultmap' clauses with 'scalar' category" } */
+  ;
+  #pragma omp target defaultmap(none:aggregate) defaultmap(alloc:scalar) defaultmap(none:scalar) /* { dg-error "too many 'defaultmap' clauses with 'scalar' category" } */
+  ;
+  #pragma omp target defaultmap(none : pointer) defaultmap ( none ) /* { dg-error "too many 'defaultmap' clauses with 'pointer' category" } */
+  ;
+  #pragma omp target defaultmap()				/* { dg-error "expected" } */
+  ;
+  #pragma omp target defaultmap(for)				/* { dg-error "expected" } */
+  ;
+  #pragma omp target defaultmap(blah)				/* { dg-error "expected" } */
+  ;
+  #pragma omp target defaultmap(tofrom:)			/* { dg-error "expected" } */
+  ;
+  #pragma omp target defaultmap(tofrom scalar)			/* { dg-error "expected" } */
+  ;
+  #pragma omp target defaultmap(tofrom,scalar)			/* { dg-error "expected" } */
+  ;
+  #pragma omp target defaultmap(default ;)			/* { dg-error "expected" } */
+  ;
+  #pragma omp target defaultmap(default : qux)			/* { dg-error "expected" } */
+  ;
+}