From a18b5e378b95f2e2f17f6e1f0d7ab0d1a181ff9c Mon Sep 17 00:00:00 2001 From: Sven Verdoolaege Date: Thu, 17 Apr 2014 13:25:01 +0200 Subject: [PATCH] add basic OpenCL test case involving structs Signed-off-by: Sven Verdoolaege --- tests/struct.c | 31 +++++++++++++++++++++++++++++++ 1 file changed, 31 insertions(+) create mode 100644 tests/struct.c diff --git a/tests/struct.c b/tests/struct.c new file mode 100644 index 0000000..c67b7bd --- /dev/null +++ b/tests/struct.c @@ -0,0 +1,31 @@ +#include + +struct s { + int c[10][10]; +}; + +int main() +{ + struct s a[10][10], b[10][10]; + + for (int i = 0; i < 10; ++i) + for (int j = 0; j < 10; ++j) + for (int k = 0; k < 10; ++k) + for (int l = 0; l < 10; ++l) + a[i][j].c[k][l] = i + j + k + l; +#pragma scop + for (int i = 0; i < 10; ++i) + for (int j = 0; j < 10; ++j) + for (int k = 0; k < 10; ++k) + for (int l = 0; l < 10; ++l) + b[i][j].c[k][l] = i + j + k + l; +#pragma endscop + for (int i = 0; i < 10; ++i) + for (int j = 0; j < 10; ++j) + for (int k = 0; k < 10; ++k) + for (int l = 0; l < 10; ++l) + if (b[i][j].c[k][l] != a[i][j].c[k][l]) + return EXIT_FAILURE; + + return EXIT_SUCCESS; +} -- 2.11.4.GIT