Vulkan: Defer deletion of shader module promises.

Common/GPU/Vulkan/thin3d_vulkan.cpp

@@ -203,7 +203,10 @@ public:
 			DEBUG_LOG(G3D, "Queueing %s (shmodule %p) for release", tag_.c_str(), module_);
 			VkShaderModule shaderModule = module_->BlockUntilReady();
 			vulkan_->Delete().QueueDeleteShaderModule(shaderModule);
-			delete module_;
+			vulkan_->Delete().QueueCallback([](void *m) {
+				auto module = (Promise<VkShaderModule> *)m;
+				delete module;
+			}, module_);
 		}
 	}
 	Promise<VkShaderModule> *Get() const { return module_; }

GPU/Vulkan/ShaderManagerVulkan.cpp

@@ -120,7 +120,10 @@ VulkanFragmentShader::~VulkanFragmentShader() {
 	if (module_) {
 		VkShaderModule shaderModule = module_->BlockUntilReady();
 		vulkan_->Delete().QueueDeleteShaderModule(shaderModule);
-		delete module_;
+		vulkan_->Delete().QueueCallback([](void *m) {
+			auto module = (Promise<VkShaderModule> *)m;
+			delete module;
+		}, module_);
 	}
 }
 
@@ -150,7 +153,10 @@ VulkanVertexShader::~VulkanVertexShader() {
 	if (module_) {
 		VkShaderModule shaderModule = module_->BlockUntilReady();
 		vulkan_->Delete().QueueDeleteShaderModule(shaderModule);
-		delete module_;
+		vulkan_->Delete().QueueCallback([](void *m) {
+			auto module = (Promise<VkShaderModule> *)m;
+			delete module;
+		}, module_);
 	}
 }
 
@@ -180,7 +186,10 @@ VulkanGeometryShader::~VulkanGeometryShader() {
 	if (module_) {
 		VkShaderModule shaderModule = module_->BlockUntilReady();
 		vulkan_->Delete().QueueDeleteShaderModule(shaderModule);
-		delete module_;
+		vulkan_->Delete().QueueCallback([](void *m) {
+			auto module = (Promise<VkShaderModule> *)m;
+			delete module;
+		}, module_);
 	}
 }