From: miha-q <>
Date: Sun, 3 Mar 2024 06:15:30 +0000 (-0500)
Subject: Sun Mar  3 01:15:30 AM EST 2024
X-Git-Url: http://www.foleosoft.com/?a=commitdiff_plain;h=3684dc49c42e585c0efb50c5b3fa94637a415500;p=QAnsel.git

Sun Mar  3 01:15:30 AM EST 2024
---

diff --git a/src/gpu/gpu.c b/src/gpu/gpu.c
index cebe490..1aec541 100644
--- a/src/gpu/gpu.c
+++ b/src/gpu/gpu.c
@@ -150,6 +150,11 @@ void GPU_mmul(float* ptrR, float* ptrA, float* ptrB, size_t rowsA, size_t colsB,
 	else
 	{
 		program = clCreateProgramWithBinary(GPU_context, 1, &GPU_device_id, &GPU_mmul_cache_len, (const unsigned char**)&GPU_mmul_cache, NULL, &err);
+		if (err != CL_SUCCESS)
+		{
+			fprintf(stderr, "GPU fatal error: clCreateProgramWithBinary() failed.\n");
+			exit(1);
+		}
 	}
 
 	//Setup kernel