[Beignet] [PATCH 5/9] test 64bit-integer immediate value, and "and", "or", "xor" arithmetic
Homer Hsing
homer.xing at intel.com
Sun Aug 4 22:06:39 PDT 2013
Signed-off-by: Homer Hsing <homer.xing at intel.com>
---
kernels/compiler_long_2.cl | 17 +++++++++++++++++
utests/CMakeLists.txt | 1 +
utests/compiler_long_2.cpp | 47 ++++++++++++++++++++++++++++++++++++++++++++++
3 files changed, 65 insertions(+)
create mode 100644 kernels/compiler_long_2.cl
create mode 100644 utests/compiler_long_2.cpp
diff --git a/kernels/compiler_long_2.cl b/kernels/compiler_long_2.cl
new file mode 100644
index 0000000..f559d93
--- /dev/null
+++ b/kernels/compiler_long_2.cl
@@ -0,0 +1,17 @@
+kernel void compiler_long_2(global long *src1, global long *src2, global long *dst) {
+ int i = get_global_id(0);
+ switch(i) {
+ case 0:
+ dst[i] = 0xFEDCBA9876543210UL;
+ break;
+ case 1:
+ dst[i] = src1[i] & src2[i];
+ break;
+ case 2:
+ dst[i] = src1[i] | src2[i];
+ break;
+ case 3:
+ dst[i] = src1[i] ^ src2[i];
+ break;
+ }
+}
diff --git a/utests/CMakeLists.txt b/utests/CMakeLists.txt
index 103b55a..3008277 100644
--- a/utests/CMakeLists.txt
+++ b/utests/CMakeLists.txt
@@ -121,6 +121,7 @@ set (utests_sources
compiler_double_3.cpp
compiler_double_4.cpp
compiler_long.cpp
+ compiler_long_2.cpp
utest_assert.cpp
utest.cpp
utest_file_map.cpp
diff --git a/utests/compiler_long_2.cpp b/utests/compiler_long_2.cpp
new file mode 100644
index 0000000..012c2ab
--- /dev/null
+++ b/utests/compiler_long_2.cpp
@@ -0,0 +1,47 @@
+#include <cstdint>
+#include <cstring>
+#include <iostream>
+#include "utest_helper.hpp"
+
+void compiler_long_2(void)
+{
+ const size_t n = 16;
+ int64_t src1[n], src2[n];
+
+ // Setup kernel and buffers
+ OCL_CREATE_KERNEL("compiler_long_2");
+ OCL_CREATE_BUFFER(buf[0], 0, n * sizeof(int64_t), NULL);
+ OCL_CREATE_BUFFER(buf[1], 0, n * sizeof(int64_t), NULL);
+ OCL_CREATE_BUFFER(buf[2], 0, n * sizeof(int64_t), NULL);
+ OCL_SET_ARG(0, sizeof(cl_mem), &buf[0]);
+ OCL_SET_ARG(1, sizeof(cl_mem), &buf[1]);
+ OCL_SET_ARG(2, sizeof(cl_mem), &buf[2]);
+ globals[0] = n;
+ locals[0] = 16;
+
+ // Run random tests
+ for (int32_t i = 0; i < (int32_t) n; ++i) {
+ src1[i] = ((long)rand() << 32) + rand();
+ src2[i] = ((long)rand() << 32) + rand();
+ }
+ OCL_MAP_BUFFER(0);
+ OCL_MAP_BUFFER(1);
+ memcpy(buf_data[0], src1, sizeof(src1));
+ memcpy(buf_data[1], src2, sizeof(src2));
+ OCL_UNMAP_BUFFER(0);
+ OCL_UNMAP_BUFFER(1);
+
+ // Run the kernel on GPU
+ OCL_NDRANGE(1);
+
+ // Compare
+ OCL_MAP_BUFFER(2);
+ int64_t *dest = ((int64_t *)buf_data[2]);
+ OCL_ASSERT(0xFEDCBA9876543210UL == (uint64_t)dest[0]);
+ OCL_ASSERT((src1[1] & src2[1]) == dest[1]);
+ OCL_ASSERT((src1[2] | src2[2]) == dest[2]);
+ OCL_ASSERT((src1[3] ^ src2[3]) == dest[3]);
+ OCL_UNMAP_BUFFER(2);
+}
+
+MAKE_UTEST_FROM_FUNCTION(compiler_long_2);
--
1.8.1.2
More information about the Beignet
mailing list