nichkara/lace
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

opengl.geometry.texturing: Use 'Mixin' generic.

Browse Source
This commit is contained in:
Rod Kay
2023-05-31 11:39:01 +10:00
parent ec4a9b357a
commit ce41c9afef
15 changed files with 381 additions and 292 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
3-mid/opengl/source/lean/geometry/opengl-geometry-lit_textured_skinned.ads
View File

@@ -1,5 +1,10 @@
with
openGL.Program.lit.textured_skinned;
openGL.Program.lit.textured_skinned,
openGL.texture_Set;
private
with
openGL.Geometry.texturing;
package openGL.Geometry.lit_textured_skinned
@@ -49,9 +54,18 @@ is
private
type Item is new Geometry.item with null record;
package textured_Geometry is new texturing.Mixin;
overriding
procedure enable_Textures (Self : in out Item);
type Item is new textured_Geometry.item with
record
null;
end record;
-- type Item is new Geometry.item with null record;
--
-- overriding
-- procedure enable_Textures (Self : in out Item);
end openGL.Geometry.lit_textured_skinned;