opengl+gel.world: Performance mods.

2024-08-18 11:31:26 +10:00
parent cd004acd69
commit 77d92d5e3b
5 changed files with 31 additions and 22 deletions
--- a/3-mid/opengl/source/lean/renderer/opengl-renderer-lean.adb
+++ b/3-mid/opengl/source/lean/renderer/opengl-renderer-lean.adb
@@ -191,7 +191,7 @@ is
   is
      use Model;

-      free_Models : graphics_Models;
+      free_Models : graphics_Models with Convention => C;     -- Convention C is for performance.
      Last        : Natural;
   begin
      Self.obsolete_Models.fetch (free_Models, Last);
@@ -208,7 +208,7 @@ is
   is
      use Impostor;

-      free_Impostors : Impostor_Set;
+      free_Impostors : Impostor_Set with Convention => C;     -- Convention C is for performance.
      Last           : Natural;
   begin
      Self.obsolete_Impostors.fetch (free_Impostors, Last);