From 0b6e063d29ee2f4e9a5fb28be3b204aa9cb39678 Mon Sep 17 00:00:00 2001 From: Rod Kay Date: Sat, 21 Oct 2023 12:31:40 +1100 Subject: [PATCH] gel.forge: Cosmetics. --- 4-high/gel/source/forge/gel-forge.adb | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/4-high/gel/source/forge/gel-forge.adb b/4-high/gel/source/forge/gel-forge.adb index 55fc1fc..42ec246 100644 --- a/4-high/gel/source/forge/gel-forge.adb +++ b/4-high/gel/source/forge/gel-forge.adb @@ -116,14 +116,14 @@ is -- function new_circle_Sprite (in_World : in gel.World.view; - Site : in math.Vector_2 := math.Origin_2D; - Mass : in math.Real := 1.0; - Friction : in math.Real := 0.5; - Bounce : in math.Real := 0.5; - Radius : in math.Real := 0.5; - Color : in openGL.Color := opengl.Palette.White; - Texture : in openGL.asset_Name := openGL.null_Asset; - user_Data : in any_user_Data_view := null) return gel.Sprite.view + Site : in math.Vector_2 := math.Origin_2D; + Mass : in math.Real := 1.0; + Friction : in math.Real := 0.5; + Bounce : in math.Real := 0.5; + Radius : in math.Real := 0.5; + Color : in openGL.Color := opengl.Palette.White; + Texture : in openGL.asset_Name := openGL.null_Asset; + user_Data : in any_user_Data_view := null) return gel.Sprite.view is use openGL; use type Vector_2;