opengl: Cosmetics.
This commit is contained in:
@@ -187,7 +187,7 @@ is
|
||||
procedure enable_Textures (Self : in out Item)
|
||||
is
|
||||
begin
|
||||
ada.Text_IO.put_Line (Self.Model'Image);
|
||||
-- ada.Text_IO.put_Line (Self.Model'Image);
|
||||
|
||||
texturing.enable (for_Model => Self.Model.all'Access,
|
||||
Uniforms => texture_Uniforms,
|
||||
|
||||
@@ -14,7 +14,7 @@ is
|
||||
|
||||
type Face is
|
||||
record
|
||||
Fades : texture_Set.fade_Levels (texture_Set.texture_Id) := [others => 0.0];
|
||||
Fades : texture_Set.fade_Levels (texture_Set.texture_Id) := [others => 0.0];
|
||||
Textures : openGL.asset_Names (1 .. Positive (texture_Set.texture_Id'Last)) := [others => null_Asset]; -- The textures to be applied to the hex.
|
||||
texture_Count : Natural := 0;
|
||||
end record;
|
||||
|
||||
Reference in New Issue
Block a user