opengl.variable.uniform: Add a 'gl_Variable' function.

2023-05-05 01:04:58 +10:00
parent 9655567e96
commit 6a8da0bd4b
2 changed files with 16 additions and 1 deletions
--- a/3-mid/opengl/source/lean/shader/opengl-variable-uniform.ads
+++ b/3-mid/opengl/source/lean/shader/opengl-variable-uniform.ads
@@ -8,7 +8,7 @@ package openGL.Variable.uniform
 --  Models a uniform variable for shaders.
 --
 is
-   type Item  is abstract new Variable.item with private;
+   type Item is abstract new Variable.item with private;


   ---------
@@ -21,6 +21,11 @@ is
   procedure destroy (Self : in out Item);


+
+   function gl_Variable (Self : in Item) return GL.GLint;
+
+
+
   -----------
   --  Actuals
   --