summaryrefslogtreecommitdiff
path: root/libgomp/testsuite/libgomp.c/examples-4/simd-7.c
diff options
context:
space:
mode:
Diffstat (limited to 'libgomp/testsuite/libgomp.c/examples-4/simd-7.c')
-rw-r--r--libgomp/testsuite/libgomp.c/examples-4/simd-7.c50
1 files changed, 50 insertions, 0 deletions
diff --git a/libgomp/testsuite/libgomp.c/examples-4/simd-7.c b/libgomp/testsuite/libgomp.c/examples-4/simd-7.c
new file mode 100644
index 00000000000..732cd9179f6
--- /dev/null
+++ b/libgomp/testsuite/libgomp.c/examples-4/simd-7.c
@@ -0,0 +1,50 @@
+/* { dg-do run { target vect_simd_clones } } */
+/* { dg-additional-options "-msse2" { target sse2_runtime } } */
+/* { dg-additional-options "-mavx" { target avx_runtime } } */
+
+#include <stdio.h>
+#include <stdlib.h>
+
+#define N 30
+int a[N], a_ref[N], b[N];
+
+#pragma omp declare simd inbranch
+int fib( int n )
+{
+ if (n <= 1)
+ return n;
+ else
+ return fib(n-1) + fib(n-2);
+}
+
+void fib_ref()
+{
+ int i;
+
+ a_ref[0] = 0;
+ a_ref[1] = 1;
+
+ for (i=2; i < N; i++)
+ a_ref[i] = a_ref[i-2] + a_ref[i-1];
+}
+
+int main(void)
+{
+ int i;
+
+#pragma omp simd
+ for (i=0; i < N; i++)
+ b[i] = i;
+
+#pragma omp simd
+ for (i=0; i < N; i++)
+ a[i] = fib(b[i]);
+
+ fib_ref ();
+
+ for (i=0; i < N; i++)
+ if (a[i] != a_ref[i])
+ abort ();
+
+ return 0;
+}