Allow to purge caches for all queues in a list

This may be used in a standard VexCL way: vex::purge_kernel_caches(ctx);
ddemidov · Sep 13, 2013 · 620217f · 620217f
1 parent 9342d0f
commit 620217f
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 1 deletion.
diff --git a/tests/context.cpp b/tests/context.cpp
@@ -17,7 +17,7 @@ void local_context() {
     BOOST_CHECK(x.size() == n);
     BOOST_CHECK(x[0] == 0);
 
-    vex::purge_kernel_caches();
+    vex::purge_kernel_caches(ctx);
 }
 
 BOOST_AUTO_TEST_CASE(create_destroy)

diff --git a/vexcl/operations.hpp b/vexcl/operations.hpp
@@ -2380,6 +2380,12 @@ void purge_kernel_caches(const cl::Context &context) {
     detail::cache_register<>::erase(context());
 }
 
+/// Clears cached OpenCL kernels, allowing to release OpenCL contexts.
+void purge_kernel_caches(const std::vector<cl::CommandQueue> &queue) {
+    for(auto q = queue.begin(); q != queue.end(); ++q)
+        detail::cache_register<>::erase( qctx(*q)() );
+}
+
 } // namespace vex;