package Values.Lists is
type List_Value is new Value with private;
type List_Ptr is new Value_Ptr with private;
function Clone
( | this | : access List_Value ) return Value_Ptr'Class; |
function Compare
( | this | : List_Value; |
other | : Value'Class ) return Integer; |
function Get
( | this | : List_Value; |
index | : Positive ) return Value_Ptr; |
function Get_Type
( | this | : List_Value ) return Value_Type; |
function Image
( | this | : List_Value ) return String; |
procedure Append
( | this | : in out List_Value; |
val | : Value_Ptr'Class ); |
function Length
( | this | : List_Value ) return Natural; |
procedure Set
( | this | : in out List_Value; |
index | : Positive; | |
val | : Value_Ptr'Class ); |
function Get
( | this | : List_Ptr ) return access List_Value'Class; |