7fd59977 |
1 | -- File: MDataStd_VariableStorageDriver.cdl |
2 | -- Created: Wed Apr 9 16:56:00 1997 |
3 | -- Author: PASCAL Denis |
4 | ---Copyright: Matra Datavision 1997 |
5 | |
6 | |
7 | class VariableStorageDriver from MDataStd inherits ASDriver from MDF |
8 | |
9 | ---Purpose: |
10 | |
11 | uses SRelocationTable from MDF, |
12 | Attribute from TDF, |
13 | Attribute from PDF, |
14 | MessageDriver from CDM |
15 | |
16 | is |
17 | |
18 | Create(theMessageDriver : MessageDriver from CDM) -- Version 0 |
19 | returns mutable VariableStorageDriver from MDataStd; |
20 | |
21 | VersionNumber(me) returns Integer from Standard; |
22 | ---Purpose: Returns the version number from which the driver |
23 | -- is available: 0. |
24 | |
25 | SourceType(me) returns Type from Standard; |
26 | ---Purpose: Returns the type: Variable from TDataStd. |
27 | |
28 | NewEmpty (me) returns mutable Attribute from PDF; |
29 | |
30 | |
31 | Paste(me; Source : Attribute from TDF; |
32 | Target : mutable Attribute from PDF; |
33 | RelocTable : SRelocationTable from MDF); |
34 | |
35 | |
36 | end VariableStorageDriver; |
37 | |