blob: b9fccbca6fd74b5d1a40ae948c7ae9c1c466b9cb (
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
|
-- File: NamedExpression.cdl
-- Created: Thu Jan 10 14:50:02 1991
-- Author: Arnaud BOUZY
-- <adn@topsn3>
---Copyright: Matra Datavision 1991
deferred class NamedExpression from Expr
inherits GeneralExpression from Expr
---Purpose: Describe an expression used by its name (as constants
-- or variables). A single reference is made to a
-- NamedExpression in every Expression (i.e. a
-- NamedExpression is shared).
uses AsciiString from TCollection
is
GetName(me)
returns AsciiString
---C++: return const &
---Level: Advanced
is static;
SetName(me : mutable; name : AsciiString)
---Level: Internal
is static;
IsShareable(me)
---Purpose: Tests if <me> can be shared by one or more expressions
-- or must be copied. This method redefines to a True
-- value the GeneralExpression method.
returns Boolean
is redefined;
IsIdentical(me; Other : GeneralExpression)
---Purpose: Tests if <me> and <Other> define the same expression.
-- This method does not include any simplification before
-- testing.
returns Boolean;
String(me)
---Purpose: returns a string representing <me> in a readable way.
returns AsciiString from TCollection;
fields
myName : AsciiString;
end NamedExpression;
|
