0022627: Change OCCT memory management defaults
[occt.git] / src / Aspect / Aspect_MarkMap.cdl
CommitLineData
7fd59977 1--
2-- File: Aspect_MarkMap.cdl
3-- Created: 13/01/95
4-- Author: GG
5--
6---Copyright: MatraDatavision 1993
7--
8
9class MarkMap from Aspect inherits TShared from MMgt
10
11 ---Version: 0.0
12
13 ---Purpose: This class defines a MarkMap object.
14 ---Keywords:
15 ---Warning:
16 ---References:
17uses
18 MarkerStyle from Aspect,
19 MarkMapEntry from Aspect,
20 SequenceOfMarkMapEntry from Aspect
21
22raises
23 BadAccess from Aspect
24
25is
26 Create returns mutable MarkMap from Aspect;
27
28 AddEntry (me : mutable; AnEntry : MarkMapEntry from Aspect)
29 ---Level: Public
30 ---Purpose: Adds an entry in the mark map <me>.
31 -- Warning: Raises BadAccess if MarkMap size is exceeded.
32 raises BadAccess from Aspect;
33
34 AddEntry (me : mutable; aStyle : MarkerStyle from Aspect)
35 returns Integer from Standard;
36 ---Level: Public
37 ---Purpose: Search an identical marker style entry in the mark map <me>
38 -- and returns the MarkMapEntry Index if exist.
39 -- Or add a new entry and returns the computed MarkMapEntry index used.
40
41 Size( me ) returns Integer from Standard is static;
42 ---Level: Public
43 ---Purpose: Returns the Allocated markmap Size
44
45 Index( me ; aMarkmapIndex : Integer ) returns Integer from Standard
46 ---Level: Public
47 ---Purpose: Returns the MarkMapEntry.Index of the MarkMap
48 -- at rank <aMarkmapIndex> .
49 raises BadAccess from Aspect is static;
50 ---Trigger: Raises BadAccess if the index less than 1 or
51 -- greater than Size.
52
53 Dump( me ) ;
54
55 Entry ( me ;
56 AnIndex : Integer from Standard )
57 returns MarkMapEntry from Aspect
58 ---Level: Public
59 ---Purpose: Returns the Mark map entry with the index <AnIndex>.
60 -- Warning: Raises BadAccess if the index less than 1 or
61 -- greater than Size.
62 raises BadAccess from Aspect is static;
63
64fields
65
66 mydata : SequenceOfMarkMapEntry from Aspect is protected;
67
68end MarkMap ;