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

opengl.geometry.texturing: Add parameter names in 'enable' procedure.

Browse Source
This commit is contained in:
Rod Kay
2025-09-07 03:54:02 +10:00
parent 92388f065e
commit 0f95206885
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
3-mid/opengl/source/lean/geometry/opengl-geometry-texturing.adb
View File

@@ -62,8 +62,8 @@ is
begin begin
for i in 1 .. openGL.texture_Set.texture_Id (for_Model.texture_Count) for i in 1 .. openGL.texture_Set.texture_Id (for_Model.texture_Count)
loop loop
Uniforms.Textures (i).fade_Uniform .Value_is (Real (for_Model.Fade (i))); Uniforms.Textures (i).fade_Uniform .Value_is (Real (for_Model.Fade (Which => i)));
Uniforms.Textures (i).texture_applied_Uniform.Value_is (for_Model.texture_Applied (i)); Uniforms.Textures (i).texture_applied_Uniform.Value_is (for_Model.texture_Applied (Which => i));
glUniform1i (Uniforms.Textures (i).texture_Uniform.gl_Variable, glUniform1i (Uniforms.Textures (i).texture_Uniform.gl_Variable,
GLint (i) - 1); GLint (i) - 1);