From 009f0e1167ab12e60440bf40263c4a30b5596e83 Mon Sep 17 00:00:00 2001 From: Rod Kay Date: Mon, 12 Feb 2024 21:02:08 +1100 Subject: [PATCH] opengl.geometry: Fix 'Shine' attribute bug. --- .../lean/geometry/opengl-geometry-lit_colored_skinned.adb | 2 +- .../geometry/opengl-geometry-lit_colored_textured_skinned.adb | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/3-mid/opengl/source/lean/geometry/opengl-geometry-lit_colored_skinned.adb b/3-mid/opengl/source/lean/geometry/opengl-geometry-lit_colored_skinned.adb index 8484a62..03f585d 100644 --- a/3-mid/opengl/source/lean/geometry/opengl-geometry-lit_colored_skinned.adb +++ b/3-mid/opengl/source/lean/geometry/opengl-geometry-lit_colored_skinned.adb @@ -147,7 +147,7 @@ is Size => 4, data_Kind => Attribute.GL_FLOAT, Stride => lit_colored_skinned.Vertex'Size / 8, - Offset => Sample.bone_Ids (1)'Address + Offset => Sample.Shine'Address - Sample.Site (1)'Address, Normalized => False); diff --git a/3-mid/opengl/source/lean/geometry/opengl-geometry-lit_colored_textured_skinned.adb b/3-mid/opengl/source/lean/geometry/opengl-geometry-lit_colored_textured_skinned.adb index e137385..ce23aa2 100644 --- a/3-mid/opengl/source/lean/geometry/opengl-geometry-lit_colored_textured_skinned.adb +++ b/3-mid/opengl/source/lean/geometry/opengl-geometry-lit_colored_textured_skinned.adb @@ -172,7 +172,7 @@ is Size => 4, data_Kind => Attribute.GL_FLOAT, Stride => lit_colored_textured_skinned.Vertex'Size / 8, - Offset => Sample.bone_Ids (1)'Address + Offset => Sample.Shine'Address - Sample.Site (1)'Address, Normalized => False);