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

opengl: Bug fixes for opengl mesa software rendering.

Browse Source
This commit is contained in:
Rod Kay
2024-04-24 18:15:27 +10:00
parent ef35111c0a
commit e202ce548d
9 changed files with 75 additions and 35 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
3-mid/opengl/source/demo/opengl-demo.adb
View File

@@ -235,11 +235,13 @@ is
End_1 => [0.0, 0.0, 0.0],
End_2 => [5.0, 5.0, 0.0]);
the_collada_Model : constant Model.any.view
:= Model.any.new_Model (--Scale => (1.0, 1.0, 1.0),
Model => to_Asset ("assets/opengl/model/human.dae"),
Texture => the_Texture,
Texture_is_lucid => False);
-- The collada model requires 'Desktop' openGL build mode.
--
-- the_collada_Model : constant Model.any.view
-- := Model.any.new_Model (--Scale => (1.0, 1.0, 1.0),
-- Model => to_Asset ("assets/opengl/model/human.dae"),
-- Texture => the_Texture,
-- Texture_is_lucid => False);
the_wavefront_Model : constant Model.any.view
:= Model.any.new_Model (--Scale => (1.0, 1.0, 1.0),
@@ -267,6 +269,7 @@ is
the_segment_line_Model : constant Model.segment_line.view
:= Model.segment_line.new_segment_line_Model (Color => Green);
-- Terrain
--
heights_File : constant asset_Name := to_Asset ("assets/opengl/terrain/kidwelly-terrain.png");
@@ -318,7 +321,7 @@ is
the_rounded_hexagon_column_Model.all'Access,
the_line_Model.all'Access,
the_collada_Model.all'Access,
-- the_collada_Model.all'Access,
the_wavefront_Model.all'Access,
the_segment_line_Model.all'Access];