gel.sprite: Add default to 'is_Visible'.

This commit is contained in:
Rod Kay
2024-03-03 20:27:39 +11:00
parent 9ef4cc7026
commit 618a3d9517
2 changed files with 2 additions and 2 deletions

View File

@@ -347,7 +347,7 @@ is
procedure is_Visible (Self : in out Item; Now : in Boolean)
procedure is_Visible (Self : in out Item; Now : in Boolean := True)
is
begin
Self.is_Visible := Now;

View File

@@ -130,7 +130,7 @@ is
procedure mvp_Matrix_is (Self : in out Item; Now : in Matrix_4x4);
function mvp_Matrix (Self : in Item) return Matrix_4x4;
procedure is_Visible (Self : in out Item; Now : in Boolean);
procedure is_Visible (Self : in out Item; Now : in Boolean := True);
function is_Visible (Self : in Item) return Boolean;
procedure key_Response_is (Self : in out Item; Now : in lace.Response.view);