opengl.shader: Disable logging of shader programs.

2024-08-24 14:00:08 +10:00
parent 29443925c5
commit 177376ab6d
1 changed files with 2 additions and 0 deletions
--- a/3-mid/opengl/source/lean/shader/opengl-shader.adb
+++ b/3-mid/opengl/source/lean/shader/opengl-shader.adb
@@ -113,6 +113,7 @@ is
                        Status'unchecked_Access);
         if    Status = 0
           and Debugging
+           and False
         then
            declare
               use ada.Text_IO;
@@ -151,6 +152,7 @@ is
      the_Source : aliased constant C.char_array := to_C_char_array (shader_Snippets);
   begin
      if Debugging
+        and False
      then
         new_Line;
         put_Line ("Shader snippets:");