blob: bd9f573836f72d301f7b10b91f0c00550309e1e4 (
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
|
-- File: Aspect_IndexPixel.cdl
-- Created: Fri Jul 23 16:25:00 1993
-- Author: Jean Louis FRENKEL
-- <jlf@sparc3>
---Copyright: Matra Datavision 1993
class IndexPixel from Aspect inherits Pixel from Aspect
is
Create
returns IndexPixel from Aspect;
Create (anIndex: Integer from Standard)
returns IndexPixel from Aspect;
Value(me)
returns Integer from Standard
is static ;
SetValue(me: in out; anIndex: Integer from Standard) is static ;
HashCode (me; Upper : Integer )
returns Integer
is redefined static ;
---Level: Public
---Purpose: Returns a hashed value denoting <me>. This value is in
-- the range 1..<Upper>.
---C++: function call
Print( me ; s : in out OStream )
is redefined static ;
---Level: Public
---Purpose : Prints the contents of <me> on the stream <s>
IsEqual(me; Other : IndexPixel from Aspect) returns Boolean;
---C++: alias operator==
IsNotEqual(me; Other : IndexPixel from Aspect) returns Boolean;
---C++: alias operator!=
fields
myIndex: Integer from Standard;
end IndexPixel from Aspect;
|
