From e6c7cf355b49457d666e0b4da0751f3e0d8e715c Mon Sep 17 00:00:00 2001
From: Thomas White <taw@physics.org>
Date: Mon, 15 Nov 2010 14:43:22 +0100
Subject: Diagnostics for get_first_dev()

---
 src/cl-utils.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/cl-utils.c b/src/cl-utils.c
index 725ea49c..a7d23371 100644
--- a/src/cl-utils.c
+++ b/src/cl-utils.c
@@ -55,7 +55,7 @@ cl_device_id get_first_dev(cl_context ctx)
 
 	r = clGetContextInfo(ctx, CL_CONTEXT_DEVICES, sizeof(dev), &dev, NULL);
 	if ( r != CL_SUCCESS ) {
-		ERROR("Couldn't get device\n");
+		ERROR("Couldn't get device: %s\n", clError(r));
 		return 0;
 	}
 
-- 
cgit v1.2.3