package Game_States is
type Game_State is limited interface;
type A_Game_State is access all Game_State'Class;
function Get_Var
( | this | : access Game_State; |
name | : String ) return Value_Ptr is abstract; |
procedure Set_Var
( | this | : access Game_State; |
name | : String; | |
value | : Value_Ptr'Class ) is abstract; |