src/MAT/MAT_TList.cdl

   1 -- File:        MAT_TList.cdl
   2 -- Created:     Tue Jun 23 12:39:10 1992
   3 -- Author:      Gilles DEBARBOUILLE
   4 --              <gde@phobox>
   5 ---Copyright:    Matra Datavision 1992
   6
   7
   8 generic class TList from MAT (Item as any)
   9
  10         ---Purpose:
  11
  12 inherits
  13
  14     TShared
  15
  16 --uses
  17
  18 --raises
  19
  20
  21 class TListNode from MAT
  22
  23         ---Purpose:
  24
  25 inherits
  26
  27     TShared
  28
  29 --uses
  30
  31 --raises
  32
  33 is
  34
  35     Create returns mutable TListNode from MAT;
  36
  37     ---C++: inline
  38
  39     Create(anitem : Item) returns mutable TListNode from MAT;
  40
  41     ---C++: inline
  42
  43     GetItem(me) returns any Item
  44
  45     -- C++: return &
  46     ---C++: inline
  47
  48     is static;
  49
  50     Next(me) returns mutable TListNode from MAT
  51
  52     ---C++: inline
  53
  54     is static;
  55
  56     Previous(me) returns mutable TListNode from MAT
  57
  58     ---C++: inline
  59
  60     is static;
  61
  62     SetItem(me : mutable ; anitem : any Item)
  63
  64     ---C++: inline
  65
  66     is static;
  67
  68     Next(me : mutable ; atlistnode : mutable TListNode from MAT)
  69
  70     ---C++: inline
  71
  72     is static;
  73
  74     Previous(me : mutable ; atlistnode : mutable TListNode from MAT)
  75
  76     ---C++: inline
  77
  78     is static;
  79
  80     Dummy(me)
  81
  82     is static;
  83
  84 fields
  85
  86     thenext     : TListNode from MAT;
  87     theprevious : TListNode from MAT;
  88     theitem     : Item;
  89
  90 end TListNode;
  91
  92 is
  93
  94     Create returns mutable TList from MAT;
  95
  96     First(me : mutable)
  97
  98     is static;
  99
 100     Last(me : mutable)
 101
 102     is static;
 103
 104     Init(me : mutable ; aniten : any Item)
 105
 106     is static;
 107
 108     Next(me : mutable)
 109
 110     is static;
 111
 112     Previous(me : mutable)
 113
 114     is static;
 115
 116     More(me) returns Boolean
 117
 118     is static;
 119
 120     Current(me) returns any Item
 121
 122     is static;
 123
 124     Current(me ; anitem : any Item)
 125
 126     is static;
 127
 128     FirstItem(me) returns any Item
 129
 130     is static;
 131
 132     LastItem(me) returns any Item
 133
 134     is static;
 135
 136     PreviousItem(me) returns any Item
 137
 138     is static;
 139
 140     NextItem(me) returns any Item
 141
 142     is static;
 143
 144     Number(me) returns Integer
 145
 146     ---C++: inline
 147
 148     is static;
 149
 150     Index(me) returns Integer
 151
 152     ---C++: inline
 153
 154     is static;
 155
 156     Brackets(me : mutable ; anindex : Integer) returns any Item
 157
 158     -- C++: return &
 159     ---C++: alias operator()
 160
 161     is static;
 162
 163     Unlink(me : mutable)
 164
 165     is static;
 166
 167     LinkBefore(me : mutable ; anitem : any Item)
 168
 169     is static;
 170
 171     LinkAfter(me : mutable ; anitem : any Item)
 172
 173     is static;
 174
 175     FrontAdd(me : mutable ; anitem : any Item)
 176
 177     is static;
 178
 179     BackAdd(me : mutable ; anitem : any Item)
 180
 181     is static;
 182
 183     Permute(me : mutable)
 184
 185     is static;
 186
 187     Loop(me)
 188
 189     is static;
 190
 191     IsEmpty(me) returns Boolean
 192
 193     is static;
 194
 195     Dump(me : mutable ; ashift , alevel : Integer);
 196
 197 fields
 198
 199     thefirstnode     : TListNode from MAT;
 200     thelastnode      : TListNode from MAT;
 201     thecurrentnode   : TListNode from MAT;
 202     thecurrentindex  : Integer;
 203     thenumberofitems : Integer;
 204
 205 end TList;