From ec16ee612f8386d69176d02bf4147abaaec0fd00 Mon Sep 17 00:00:00 2001
From: Joseph Redmon <pjreddie@gmail.com>
Date: Thu, 17 Apr 2014 22:05:41 +0000
Subject: [PATCH] Old feature extraction method

---
 src/opencl.c |    8 +++++---
 1 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/src/opencl.c b/src/opencl.c
index 193fba3..439d8cb 100644
--- a/src/opencl.c
+++ b/src/opencl.c
@@ -16,11 +16,13 @@
 {
     cl_info info;
     info.initialized = 0;
-    cl_uint platforms, devices;
+    //cl_uint num_platforms, num_devices;
     // Fetch the Platform and Device IDs; we only want one.
-    info.error=clGetPlatformIDs(1, &info.platform, &platforms);
+    cl_device_id devices[2];
+    info.error=clGetPlatformIDs(1, &info.platform, 0);
     check_error(info);
-    info.error=clGetDeviceIDs(info.platform, CL_DEVICE_TYPE_ALL, 1, &info.device, &devices);
+    info.error=clGetDeviceIDs(info.platform, CL_DEVICE_TYPE_ALL, 2, devices, 0);
+    info.device = devices[rand()%2];
     check_error(info);
 
     cl_context_properties properties[]={

--
Gitblit v1.10.0