7fd59977 |
1 | -- File: PDataStd_Integer.cdl |
2 | -- Created: Wed Apr 9 11:26:37 1997 |
3 | -- Author: VAUTHIER Jean-Claude |
4 | ---Copyright: Matra Datavision 1997 |
5 | |
6 | |
7 | class Integer from PDataStd inherits Attribute from PDF |
8 | |
9 | ---Purpose: |
10 | |
11 | uses Integer from Standard |
12 | |
13 | is |
14 | |
15 | |
16 | Create returns mutable Integer from PDataStd; |
17 | |
18 | |
19 | Create (V : Integer from Standard) |
20 | returns mutable Integer from PDataStd; |
21 | |
22 | |
23 | Get (me) returns Integer from Standard; |
24 | |
25 | |
26 | Set (me : mutable; V : Integer from Standard); |
27 | |
28 | |
29 | fields |
30 | |
31 | myValue : Integer from Standard; |
32 | |
33 | end Integer; |