blob: 055d7959d33c4c465a59cacebac54af70214fa37 (
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
|
-- File: DNaming_SelectionDriver.cdl
-- Created: Tue May 5 10:29:43 2009
-- Author: Sergey ZARITCHNY <sergey.zaritchny@opencascade.com>
---Copyright: Open CasCade SA 2009
class SelectionDriver from DNaming inherits Driver from TFunction
---Purpose:
uses
Label from TDF,
Logbook from TFunction,
Function from TFunction,
ExtendedString from TCollection
is
Create returns mutable SelectionDriver from DNaming;
---Purpose: Constructor
---Purpose: validation
-- ==========
Validate(me; theLog : in out Logbook from TFunction)
is redefined;
---Purpose: Validates labels of a function in <log>.
-- In regeneration mode this method must be called (by the
-- solver) even if the function is not executed, to build
-- the valid label scope.
---Purpose: execution of function
-- ======================
MustExecute (me; theLog : Logbook from TFunction)
---Purpose: Analyse in <log> if the loaded function must be executed
-- (i.e.arguments are modified) or not.
-- If the Function label itself is modified, the function must
-- be executed.
returns Boolean from Standard
is redefined;
Execute (me; theLog : in out Logbook from TFunction)
---Purpose: Execute the function and push in <log> the impacted
-- labels (see method SetImpacted).
returns Integer from Standard
is redefined;
end SelectionDriver;
|
