0023258: Missing parenthesis
[occt.git] / src / MDocStd / MDocStd_XLinkStorageDriver.cdl
1 -- Created by: DAUTRY Philippe
2 -- Copyright (c) 1997-1999 Matra Datavision
3 -- Copyright (c) 1999-2012 OPEN CASCADE SAS
4 --
5 -- The content of this file is subject to the Open CASCADE Technology Public
6 -- License Version 6.5 (the "License"). You may not use the content of this file
7 -- except in compliance with the License. Please obtain a copy of the License
8 -- at http://www.opencascade.org and read it completely before using this file.
9 --
10 -- The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
11 -- main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
12 --
13 -- The Original Code and all software distributed under the License is
14 -- distributed on an "AS IS" basis, without warranty of any kind, and the
15 -- Initial Developer hereby disclaims all such warranties, including without
16 -- limitation, any warranties of merchantability, fitness for a particular
17 -- purpose or non-infringement. Please see the License for the specific terms
18 -- and conditions governing the rights and limitations under the License.
19
20 --              ---------------------------
21
22 ---Version:     0.0
23 --Version       Date            Purpose
24 --              0.0     Sep 17 1997     Creation
25
26
27 class XLinkStorageDriver from MDocStd
28     inherits ASDriver from MDF
29
30         ---Purpose: Tool used to translate a transient XLink into a
31         --          persistent one.
32
33 uses
34
35     SRelocationTable from MDF,
36     Attribute        from TDF,
37     Attribute        from PDF, 
38     MessageDriver    from CDM
39
40 is
41
42     Create(theMessageDriver : MessageDriver from CDM) -- Version 0
43     returns mutable XLinkStorageDriver from MDocStd;
44
45     VersionNumber(me) returns Integer from Standard;
46         ---Purpose: Returns the version number from which the driver
47         --          is available: 0.
48
49     SourceType(me) returns Type from Standard;
50         ---Purpose: Returns the type: XLink from TXLink.
51
52     NewEmpty (me)
53     returns mutable Attribute from PDF;
54
55
56     Paste(me;
57           aSource     :         Attribute        from TDF;
58           aTarget     : mutable Attribute        from PDF;
59           aRelocTable :         SRelocationTable from MDF);
60           
61           
62 end XLinkStorageDriver;