Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

closes #11: change test to new create context function

  • Loading branch information...
commit ba5fe0374399528d64ca3e7541d4a37da25f186b 1 parent 36308d7
@zhensydow zhensydow authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  src/test/test-opencl.hs
View
2  src/test/test-opencl.hs
@@ -50,7 +50,7 @@ dupOpencl xs = do
-- Initialize OpenCL
(platform:_) <- clGetPlatformIDs
(dev:_) <- clGetDeviceIDs platform CL_DEVICE_TYPE_ALL
- context <- clCreateContext [dev] print
+ context <- clCreateContext [] [dev] print
q <- clCreateCommandQueue context dev []
-- Initialize Kernel
Please sign in to comment.
Something went wrong with that request. Please try again.