7fd59977 |
1 | -- File: TCollection_AVLBaseNode.cdl |
2 | -- Created: Wed Jan 21 15:32:50 1998 |
3 | -- Author: Kernel |
4 | -- <kernel@parigox.paris1.matra-dtv.fr> |
5 | ---Copyright: Matra Datavision 1998 |
6 | |
7 | class AVLBaseNode from TCollection |
8 | inherits TShared from MMgt |
9 | uses AVLBaseNodePtr from TCollection, |
10 | Side from TCollection |
11 | is |
12 | Create(L,R : AVLBaseNodePtr from TCollection) returns mutable AVLBaseNode from TCollection; |
13 | ---C++: inline |
14 | |
15 | SetChild(me : mutable; theNode : AVLBaseNodePtr from TCollection; theSide : Side from TCollection); |
16 | ---C++: inline |
17 | |
18 | Height(myclass; ANode : AVLBaseNodePtr from TCollection) returns Integer; |
19 | RecursiveExtent(myclass; ANode : AVLBaseNodePtr from TCollection) returns Integer; |
20 | RecursiveTotalExtent(myclass; ANode : AVLBaseNodePtr from TCollection) returns Integer; |
21 | |
22 | Right(me) returns AVLBaseNodePtr from TCollection; |
23 | ---C++: inline |
24 | ---C++: return & |
25 | |
26 | Left(me) returns AVLBaseNodePtr from TCollection; |
27 | ---C++: inline |
28 | ---C++: return & |
29 | |
30 | Count(me) returns Integer; |
31 | ---C++: inline |
32 | ---C++: return & |
33 | |
34 | fields |
35 | myLeft : AVLBaseNodePtr from TCollection is protected; |
36 | myRight : AVLBaseNodePtr from TCollection is protected; |
37 | myCount : Integer from Standard is protected; |
38 | end; |
39 | |