blob: fcc5e33ba1cdcffe253a9bc485fea00b1cbe3123 (
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
|
-- File: TDF_AttributeDelta.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
deferred class AttributeDelta from TDF inherits TShared from MMgt
---Purpose: This class discribes the services we need to
-- implement Delta and Undo/Redo services.
--
-- AttributeDeltas are applied in an unpredictable
-- order. But by the redefinition of the method
-- IsNowApplicable, a condition can be verified
-- before application. If the AttributeDelta is not
-- yet applicable, it is put at the end of the
-- AttributeDelta list, to be treated later. If a
-- dead lock if found on the list, the
-- AttributeDeltas are forced to be applied in an
-- unpredictable order.
uses
Label from TDF,
Attribute from TDF
is
Initialize(anAttribute: Attribute from TDF);
Apply(me : mutable)
is deferred;
---Purpose: Applies the delta to the attribute.
Label(me)
returns Label from TDF;
---Purpose: Returns the label concerned by <me>.
Attribute(me)
returns Attribute from TDF;
---Purpose: Returns the reference attribute.
ID(me)
returns GUID from Standard;
---Purpose: Returns the ID of the attribute concerned by <me>.
---Category: Miscelleaneous
-- --------------------------------------------------------------
Dump(me; OS : in out OStream from Standard)
returns OStream from Standard
is virtual;
---Purpose: Dumps the contents.
--
---C++: return &
---C++: alias operator<<
fields
myAttribute : Attribute from TDF;
myLabel : Label from TDF;
end AttributeDelta;
|