From 9655567e963fd55844fa5a8e1052703d009a4ab8 Mon Sep 17 00:00:00 2001
From: Rod Kay <rodakay5@gmail.com>
Date: Fri, 5 May 2023 01:04:06 +1000
Subject: [PATCH] opengl.variable: Add a 'null_Variable' constant.

---
 3-mid/opengl/source/lean/shader/opengl-variable.ads | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/3-mid/opengl/source/lean/shader/opengl-variable.ads b/3-mid/opengl/source/lean/shader/opengl-variable.ads
index 62f02f0..b39856b 100644
--- a/3-mid/opengl/source/lean/shader/opengl-variable.ads
+++ b/3-mid/opengl/source/lean/shader/opengl-variable.ads
@@ -20,9 +20,12 @@ is
 
 private
 
+   null_Variable : constant gl.GLint := gl.GLint'Last;
+
+
    type Item is abstract tagged
       record
-         gl_Variable : gl.GLint;
+         gl_Variable : gl.GLint := null_Variable;
       end record;
 
 end openGL.Variable;