… | … | ||
---|---|---|---|
18 | 18 | ||
19 | for (OpenCL::platforms) { | 19 | for (OpenCL::platforms) { |
20 | $platform = $_; | 20 | $platform = $_; |
21 | for ($platform->devices) { | 21 | for ($platform->devices) { |
22 | $dev = $_; | 22 | $dev = $_; |
23 | $ctx = $platform->context ([OpenCL::GLX_DISPLAY_KHR, undef, OpenCL::GL_CONTEXT_KHR, undef], [$dev]) | 23 | $ctx = $platform->context (undef, [$dev]) |
24 | and last; | 24 | and last; |
25 | } | 25 | } |
26 | } | 26 | } |
27 | 27 | ||
28 | $ctx | 28 | $ctx |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |