all: Fix simple warnings and cosmetics.
This commit is contained in:
@@ -1,4 +1,3 @@
|
||||
with openGL.texture_Set;
|
||||
with
|
||||
gel.Applet.gui_World,
|
||||
gel.Window.setup,
|
||||
@@ -8,8 +7,8 @@ with
|
||||
physics.Model,
|
||||
|
||||
openGL.Model.any,
|
||||
openGL.Light,
|
||||
openGL.texture_Set,
|
||||
openGL.Light,
|
||||
|
||||
ada.Calendar,
|
||||
ada.Text_IO,
|
||||
@@ -86,7 +85,7 @@ begin
|
||||
the_Human.Site_is ([0.0, 5.0, 0.0]); --
|
||||
|
||||
-- the_Applet.gui_World.add (the_Cobra); -- Add cobra.
|
||||
the_Cobra.Site_is ((0.0, 5.0, 0.0)); --
|
||||
the_Cobra.Site_is ([0.0, 5.0, 0.0]); --
|
||||
|
||||
the_Applet.gui_Camera.Site_is ([0.0, 1.5, 2.6]); -- Position the camera.
|
||||
-- the_Applet.gui_Camera.Site_is ((0.0, 100.0, 0.0)); -- Position the camera.
|
||||
|
||||
@@ -17,8 +17,7 @@ procedure launch_text_sprite_Demo
|
||||
-- Shows a few text sprites.
|
||||
--
|
||||
is
|
||||
use gel.Math,
|
||||
openGL.Palette;
|
||||
use openGL.Palette;
|
||||
|
||||
the_Applet : constant gel.Applet.gui_World.view := gel.Forge.new_gui_Applet ("text sprite Demo",
|
||||
space_Kind => physics.Bullet);
|
||||
|
||||
Reference in New Issue
Block a user