Add initial prototype.

3-mid/opengl/source/lean/shader/opengl-variable.adb

@@ -0,0 +1,22 @@
+package body openGL.Variable
+is
+
+   ---------
+   --  Forge
+   --
+
+   procedure define  (Self : in out Item)     -- TODO: Rid these ?
+   is
+   begin
+      null;
+   end define;
+
+
+   procedure destroy (Self : in out Item)
+   is
+   begin
+      null;
+   end destroy;
+
+
+end openGL.Variable;