[Beignet] [PATCH 1/2] padding enough temporary registers in 64-bit IO

Xing, Homer homer.xing at intel.com
Sun Jul 28 19:08:29 PDT 2013


Ping for review.

http://lists.freedesktop.org/archives/beignet/2013-July/001007.html

-----Original Message-----
From: beignet-bounces+homer.xing=intel.com at lists.freedesktop.org [mailto:beignet-bounces+homer.xing=intel.com at lists.freedesktop.org] On Behalf Of Homer Hsing
Sent: Wednesday, July 24, 2013 10:39 AM
To: beignet at lists.freedesktop.org
Subject: [Beignet] [PATCH 2/2] test previous patch


Signed-off-by: Homer Hsing <homer.xing at intel.com>
---
 kernels/compiler_double_4.cl |  5 +++++
 utests/CMakeLists.txt        |  1 +
 utests/compiler_double_4.cpp | 40 ++++++++++++++++++++++++++++++++++++++++
 3 files changed, 46 insertions(+)
 create mode 100644 kernels/compiler_double_4.cl  create mode 100644 utests/compiler_double_4.cpp

diff --git a/kernels/compiler_double_4.cl b/kernels/compiler_double_4.cl new file mode 100644 index 0000000..e5e46f9
--- /dev/null
+++ b/kernels/compiler_double_4.cl
@@ -0,0 +1,5 @@
+#pragma OPENCL EXTENSION cl_khr_fp64 : enable kernel void 
+compiler_double_4(global double *src1, global double *src2, global 
+double *dst) {
+  int i = get_global_id(0);
+  dst[i] = src1[i] + src2[i];
+}
diff --git a/utests/CMakeLists.txt b/utests/CMakeLists.txt index 95f3d9b..b2670bf 100644
--- a/utests/CMakeLists.txt
+++ b/utests/CMakeLists.txt
@@ -112,6 +112,7 @@ set (utests_sources
   compiler_double.cpp
   compiler_double_2.cpp
   compiler_double_3.cpp
+  compiler_double_4.cpp
   utest_assert.cpp
   utest.cpp
   utest_file_map.cpp
diff --git a/utests/compiler_double_4.cpp b/utests/compiler_double_4.cpp new file mode 100644 index 0000000..cb25bd4
--- /dev/null
+++ b/utests/compiler_double_4.cpp
@@ -0,0 +1,40 @@
+#include <cmath>
+#include "utest_helper.hpp"
+
+void compiler_double_4(void)
+{
+  const size_t n = 16;
+  double cpu_src1[n], cpu_src2[n];
+
+  // Setup kernel and buffers
+  OCL_CREATE_KERNEL("compiler_double_4");
+  OCL_CREATE_BUFFER(buf[0], 0, n * sizeof(double), NULL);  
+ OCL_CREATE_BUFFER(buf[1], 0, n * sizeof(double), NULL);  
+ OCL_CREATE_BUFFER(buf[2], 0, n * sizeof(double), 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
+  OCL_MAP_BUFFER(0);
+  OCL_MAP_BUFFER(1);
+  for (int32_t i = 0; i < (int32_t) n; ++i) {
+    cpu_src1[i] = ((double*)buf_data[0])[i] = rand() * 1e-2;
+    cpu_src2[i] = ((double*)buf_data[1])[i] = rand() * 1e-2;  }  
+ OCL_UNMAP_BUFFER(0);  OCL_UNMAP_BUFFER(1);
+
+  // Run the kernel on GPU
+  OCL_NDRANGE(1);
+
+  // Compare
+  OCL_MAP_BUFFER(2);
+  for (int32_t i = 0; i < (int32_t) n; ++i)
+    OCL_ASSERT(fabs(((double*)buf_data[2])[i] - cpu_src1[i] - 
+cpu_src2[i]) < 1e-4);
+  OCL_UNMAP_BUFFER(2);
+}
+
+MAKE_UTEST_FROM_FUNCTION(compiler_double_4);
--
1.8.1.2

_______________________________________________
Beignet mailing list
Beignet at lists.freedesktop.org
http://lists.freedesktop.org/mailman/listinfo/beignet


More information about the Beignet mailing list