blob: 0cf931284be7a1c3000abee67882264f6bac8b99 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
|
-- File: TDF_Delta.cdl
-- -------------
-- Author: DAUTRY Philippe
-- <fid@fox.paris1.matra-dtv.fr>
---Copyright: MATRA DATAVISION 1997
---Version: 0.0
---History: Version Date Purpose
-- 0.0 Sep 8 1997 Creation
class Delta from TDF inherits TShared from MMgt
---Purpose: A delta set is available at <aSourceTime>. If
-- applied, it restores the TDF_Data in the state it
-- was at <aTargetTime>.
uses
OStream from Standard,
ExtendedString from TCollection,
LabelList from TDF,
AttributeDelta from TDF,
AttributeDeltaList from TDF
raises
OutOfRange from Standard
is
Create;
---Purpose: Creates a delta.
Validity(me : mutable;
aBeginTime : Integer from Standard;
anEndTime : Integer from Standard)
is protected;
---Purpose: Validates <me> at <aBeginTime>. If applied, it
-- restores the TDF_Data in the state it was at
-- <anEndTime>. Reserved to TDF_Data.
AddAttributeDelta (me : mutable;
anAttributeDelta : AttributeDelta from TDF)
is protected;
---Purpose: Adds an AttributeDelta to the list. Reserved to
-- TDF_Data.
IsEmpty (me) returns Boolean from Standard;
---Purpose: Returns true if there is nothing to undo.
--
---C++: inline
BeforeOrAfterApply(me; before : Boolean from Standard) is private;
Apply (me : mutable) is private;
IsApplicable (me; aCurrentTime : Integer from Standard)
returns Boolean from Standard;
---Purpose: Returns true if the Undo action of <me> is
-- applicable at <aCurrentTime>.
--
---C++: inline
BeginTime (me) returns Integer;
---Purpose: Returns the field <myBeginTime>.
---C++: inline
EndTime (me) returns Integer;
---Purpose: Returns the field <myEndTime>.
---C++: inline
Labels(me; aLabelList : in out LabelList from TDF);
---Purpose: Adds in <aLabelList> the labels of the attribute deltas.
-- Caution: <aLabelList> is not cleared before use.
AttributeDeltas (me) returns AttributeDeltaList from TDF;
---Purpose: Returns the field <myAttDeltaList>.
---C++: inline
---C++: return const &
Name(me) returns ExtendedString from TCollection;
---Purpose: Returns a name associated with this delta.
---C++: inline
SetName(me : mutable; theName : ExtendedString from TCollection);
---Purpose: Associates a name <theName> with this delta
---C++: inline
Dump(me; OS : in out OStream from Standard);
fields
myBeginTime : Integer from Standard;
myEndTime : Integer from Standard;
myAttDeltaList : AttributeDeltaList from TDF;
myName : ExtendedString from TCollection;
friends
class Data from TDF
end Delta;
|
