summaryrefslogtreecommitdiff
path: root/utests/compiler_double_precision.cpp
blob: f77a0597fe2716df8b741885222fe235b648ebd0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
#include "utest_helper.hpp"
#include <math.h>

static void double_precision_check(void)
{
  const size_t n = 16; //8192 * 4;

  double d0 = 0.12345678912345678;
  double d1 = 0.12355678922345678;
  float cpu_result = d1 - d0;

  if (!cl_check_double())
    return;

  // Setup kernel and buffers
  OCL_CREATE_KERNEL("double_precision_check");
  //OCL_CREATE_KERNEL("compiler_array");
  buf_data[0] = (uint32_t*) malloc(sizeof(uint32_t) * n);
  for (uint32_t i = 0; i < n; ++i) ((float*)buf_data[0])[i] = 0;
  OCL_CREATE_BUFFER(buf[0], CL_MEM_COPY_HOST_PTR, n * sizeof(uint32_t), buf_data[0]);
  OCL_CREATE_BUFFER(buf[1], 0, n * sizeof(uint32_t), NULL);
  free(buf_data[0]);
  buf_data[0] = NULL;

  // Run the kernel
  OCL_SET_ARG(0, sizeof(cl_mem), &buf[0]);
  OCL_SET_ARG(1, sizeof(cl_mem), &buf[1]);
  globals[0] = n;
  locals[0] = 16;
  OCL_NDRANGE(1);

  // Check result
  OCL_MAP_BUFFER(0);
  OCL_MAP_BUFFER(1);
  bool precisionOK = true;
  for (uint32_t i = 0; i < n; ++i) {
    float error = ((float*)buf_data[1])[i] - cpu_result;
    if (error != 0)
      precisionOK = false;
    OCL_ASSERT((fabs(error) < 1e-4));
  }
  if (!precisionOK)
    printf("\n  - WARN: GPU doesn't have correct double precision. Got %.7G, expected %.7G\n", ((float*)buf_data[1])[0], cpu_result);
}

MAKE_UTEST_FROM_FUNCTION(double_precision_check);