From: Andreas Beckmann <anbe@debian.org>
Date: Mon, 21 Mar 2022 16:48:30 +0000 (+0100)
Subject: [PATCH 1001/1017] poclcc: use poclu_show_program_build_log()
X-Git-Tag: archive/raspbian/3.0-6+rpi1~1^2~28
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=c36a98ccfa91a76c0b990ffebb1cabf33dcbc124;p=pocl.git

[PATCH 1001/1017] poclcc: use poclu_show_program_build_log()


Gbp-Pq: Name 1001-poclcc-use-poclu_show_program_build_log.patch
---

diff --git a/bin/poclcc.c b/bin/poclcc.c
index c6de231..24aef3f 100644
--- a/bin/poclcc.c
+++ b/bin/poclcc.c
@@ -333,16 +333,8 @@ main(int argc, char **argv)
   if (err != CL_SUCCESS)
     {
       printf ("Compilation failed\n");
-      char build_log[4096];
-      size_t actual_size = 0;
-      err = clGetProgramBuildInfo (program, device_ids[opencl_device_id],
-                                   CL_PROGRAM_BUILD_LOG, 4095, build_log,
-                                   &actual_size);
-      if (err == CL_SUCCESS)
-        {
-          build_log[actual_size] = 0;
-          printf ("Error log: \n\n%s\n", build_log);
-        }
+      poclu_show_program_build_log (program);
+      CHECK_OPENCL_ERROR_IN ("clBuildProgram");
     }
 
   size_t binary_sizes;