opengl.renderer.lean: Set a 'max_Geometries' constant.
This commit is contained in:
@@ -120,7 +120,10 @@ private
|
|||||||
|
|
||||||
type Camera_view is access all openGL.Camera.item'Class;
|
type Camera_view is access all openGL.Camera.item'Class;
|
||||||
|
|
||||||
max_Visuals : constant := 20_000;
|
max_Visuals : constant := 20_000;
|
||||||
|
max_Geometries : constant := max_Visuals * 6;
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
----------
|
----------
|
||||||
-- Updates
|
-- Updates
|
||||||
@@ -275,8 +278,8 @@ private
|
|||||||
Textures : aliased Texture.name_Map_of_texture;
|
Textures : aliased Texture.name_Map_of_texture;
|
||||||
Fonts : Font.font_id_Map_of_font;
|
Fonts : Font.font_id_Map_of_font;
|
||||||
|
|
||||||
all_opaque_Couples : visual_geometry_Couples_view := new visual_geometry_Couples (1 .. max_Visuals);
|
all_opaque_Couples : visual_geometry_Couples_view := new visual_geometry_Couples (1 .. max_Geometries);
|
||||||
all_lucid_Couples : visual_geometry_Couples_view := new visual_geometry_Couples (1 .. max_Visuals);
|
all_lucid_Couples : visual_geometry_Couples_view := new visual_geometry_Couples (1 .. max_Geometries);
|
||||||
|
|
||||||
obsolete_Models : safe_Models;
|
obsolete_Models : safe_Models;
|
||||||
obsolete_Impostors : safe_Impostors;
|
obsolete_Impostors : safe_Impostors;
|
||||||
|
|||||||
Reference in New Issue
Block a user