1 files changed, 14 insertions, 0 deletions
diff --git a/gcc/testsuite/gcc.dg/gomp/appendix-a/a.30.1.c b/gcc/testsuite/gcc.dg/gomp/appendix-a/a.30.1.c
new file mode 100644
index 000000000..e34be4c42
--- /dev/null
+++ b/gcc/testsuite/gcc.dg/gomp/appendix-a/a.30.1.c
@@ -0,0 +1,14 @@
+/* { dg-do compile } */
+
+void
+a30 (int n, float *a, float *b)
+{
+  int i;
+#pragma omp parallel
+  {
+#pragma omp for lastprivate(i)
+    for (i = 0; i < n - 1; i++)
+      a[i] = b[i] + b[i + 1];
+  }
+  a[i] = b[i];			/* i == n-1 here */
+}