diff --git a/modules/core/src/ocl.cpp b/modules/core/src/ocl.cpp
index 984307e3fc93bf4302ff3e3bf449ba8391ac971f..6da86b700e0f8acfba7d144a80ed72ac10c882cd 100644
--- a/modules/core/src/ocl.cpp
+++ b/modules/core/src/ocl.cpp
@@ -1387,7 +1387,7 @@ struct Context::Impl
             }
         }
         Program prog(src, buildflags, errmsg);
-        if(prog.ptr())
+        // Cache result of build failures too (to prevent unnecessary compiler invocations)
         {
             cv::AutoLock lock(program_cache_mutex);
             phash.insert(std::pair<std::string, Program>(key, prog));