blob: a27869b124f9b0ac34c30b5ba190d752c0346e03 (
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
|
-- File: Transfer_ActorOfTransientProcess.cdl
-- Created: Wed Sep 4 17:42:46 1996
-- Author: Christian CAILLET
-- <cky@fidox.paris1.matra-dtv.fr>
---Copyright: Matra Datavision 1996
class ActorOfTransientProcess from Transfer inherits ActorOfProcessForTransient from Transfer
---Purpose : The original class was renamed. Compatibility only
uses Transient, TransientProcess, ProcessForTransient, Binder
is
Create returns mutable ActorOfTransientProcess;
Transferring (me : mutable; start : Transient; TP : mutable ProcessForTransient)
returns mutable Binder is redefined;
-- calls the one below
Transfer (me : mutable; start : Transient; TP : mutable TransientProcess)
returns mutable Binder is virtual;
-- default calls TransferTransient i.e. does nothing, to be redefined
TransferTransient (me : mutable; start : Transient;
TP : mutable TransientProcess)
returns mutable Transient is virtual;
-- default does nothing, can be redefined
-- usefull when a result is Transient, simpler to define than Transfer with
-- a Binder
end ActorOfTransientProcess;
|