| … | |
… | |
| 295 | info (OpenCL::Context this, cl_context_info name) |
295 | info (OpenCL::Context this, cl_context_info name) |
| 296 | PPCODE: |
296 | PPCODE: |
| 297 | INFO (Context) |
297 | INFO (Context) |
| 298 | |
298 | |
| 299 | void |
299 | void |
| 300 | command_queue_simple (OpenCL::Context this, OpenCL::Device device) |
300 | queue (OpenCL::Context this, OpenCL::Device device, cl_command_queue_properties properties) |
| 301 | PPCODE: |
301 | PPCODE: |
| 302 | { |
302 | { |
| 303 | cl_int res; |
303 | cl_int res; |
| 304 | cl_command_queue queue = clCreateCommandQueue (this, device, 0, &res); |
304 | cl_command_queue queue = clCreateCommandQueue (this, device, properties, &res); |
| 305 | |
305 | |
| 306 | if (res) |
306 | if (res) |
| 307 | FAIL (CreateCommandQueue, res); |
307 | FAIL (CreateCommandQueue, res); |
| 308 | |
308 | |
| 309 | XPUSH_NEW_OBJ ("OpenCL::Queue", queue); |
309 | XPUSH_NEW_OBJ ("OpenCL::Queue", queue); |
