0023022: This is desirable to access OpenGl extensions and core API (1.2+) in one...
[occt.git] / src / XmlMNaming / XmlMNaming.cxx
1 // File:      XmlMNaming.cxx
2 // Created:   31.07.01 20:34:58
3 // Author:    Alexander GRIGORIEV
4 // Copyright: Open Cascade 2001
5 // History:
6
7 #include <XmlMNaming.ixx>
8
9 #include <XmlMNaming_NamedShapeDriver.hxx>
10 #include <XmlMNaming_NamingDriver.hxx>
11
12 static Standard_Integer myDocumentVersion = -1;
13 //=======================================================================
14 //function : AddStorageDrivers
15 //purpose  : 
16 //=======================================================================
17 void XmlMNaming::AddDrivers (const Handle(XmlMDF_ADriverTable)& aDriverTable,
18                              const Handle(CDM_MessageDriver)&   aMessageDriver)
19 {
20   aDriverTable->AddDriver (new XmlMNaming_NamedShapeDriver(aMessageDriver));
21   aDriverTable->AddDriver (new XmlMNaming_NamingDriver(aMessageDriver));
22 }
23
24 //=======================================================================
25 //function : SetDocumentVersion
26 //purpose  : Sets current document version
27 //=======================================================================
28 void XmlMNaming::SetDocumentVersion(const Standard_Integer theVersion)
29 {
30   myDocumentVersion = theVersion;
31 }
32 //=======================================================================
33 //function : DocumentVersion
34 //purpose  : Retrieved document version
35 //=======================================================================
36 Standard_Integer XmlMNaming::DocumentVersion()
37 {
38   return myDocumentVersion;
39 }