all: Fix simple warnings and cosmetics.

This commit is contained in:
Rod Kay
2025-09-21 11:39:31 +10:00
parent aa5ff988fa
commit b02c1a92f7
35 changed files with 47 additions and 165 deletions

View File

@@ -1,7 +1,5 @@
with
gel.Events,
gel.Camera.forge,
lace.Event.utility,
ada.unchecked_Deallocation;
@@ -11,8 +9,6 @@ is
procedure define (Self : in gel.Applet.client_world.view; Name : in String;
space_Kind : in physics.space_Kind)
is
use lace.Event.utility;
the_world_Info : constant world_Info_view := new world_Info;
the_Camera : constant gel.Camera.View := gel.Camera.forge.new_Camera;
begin

View File

@@ -1,7 +1,5 @@
with
gel.Events,
gel.Camera.forge,
lace.Event.utility,
ada.unchecked_Deallocation;
@@ -11,8 +9,6 @@ is
procedure define (Self : in gel.Applet.server_world.view; Name : in String;
space_Kind : in physics.space_Kind)
is
use lace.Event.utility;
the_world_Info : constant world_Info_view := new world_Info;
the_Camera : constant gel.Camera.View := gel.Camera.forge.new_Camera;
begin