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

gel.world: Work on dsa.

Browse Source
This commit is contained in:
Rod Kay
2023-11-17 15:09:14 +11:00
parent fa02760f9c
commit c921b638a1
8 changed files with 207 additions and 116 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
4-high/gel/source/world/gel-world.ads
View File

@@ -244,9 +244,9 @@ is
overriding
function graphics_Models (Self : in Item) return remote.World.graphics_Model_Set;
function graphics_Models (Self : in Item) return remote.World.id_Map_of_graphics_model;
overriding
function physics_Models (Self : in Item) return remote.World.physics_Model_Set;
function physics_Models (Self : in Item) return remote.World.id_Map_of_physics_model;
overriding
function Sprites (Self : in out Item) return remote.World.sprite_model_Pairs;
@@ -259,11 +259,11 @@ is
--
use type openGL.Model.view;
use type gel.graphics_model_Id;
function Hash is new ada.unchecked_Conversion (gel.graphics_model_Id, ada.Containers.Hash_type);
package id_Maps_of_model is new ada.Containers.hashed_Maps (gel.graphics_model_Id, openGL.Model.view,
Hash, "=");
function Hash is new ada.unchecked_Conversion (gel.graphics_model_Id, ada.Containers.Hash_type);
package id_Maps_of_graphics_model is new ada.Containers.hashed_Maps (gel.graphics_model_Id, openGL.Model.view,
Hash, "=");
function local_graphics_Models (Self : in Item) return id_Maps_of_model.Map;
function local_graphics_Models (Self : in Item) return id_Maps_of_graphics_model.Map;
-- Physics Models
@@ -401,7 +401,7 @@ private
-- Models
--
graphics_Models : aliased id_Maps_of_model .Map;
graphics_Models : aliased id_Maps_of_graphics_model .Map;
physics_Models : aliased id_Maps_of_physics_model.Map;
-- Ids