1 files changed, 23 insertions, 0 deletions
diff --git a/gcc/testsuite/gcc.dg/gomp/appendix-a/a.14.1.c b/gcc/testsuite/gcc.dg/gomp/appendix-a/a.14.1.c
new file mode 100644
index 000000000..14a7ed0bd
--- /dev/null
+++ b/gcc/testsuite/gcc.dg/gomp/appendix-a/a.14.1.c
@@ -0,0 +1,23 @@
+/* { dg-do compile } */
+
+void
+a14 ()
+{
+  int i = 1;
+#pragma omp parallel sections
+  {
+#pragma omp section
+    {
+#pragma omp critical (name)
+      {
+#pragma omp parallel
+	{
+#pragma omp single
+	  {
+	    i++;
+	  }
+	}
+      }
+    }
+  }
+}