0025812: Replace dynamic loading mechanism of OCAF persistence with dynamic-link one

[occt.git] / src / StdLDrivers / StdLDrivers.cxx

diff --git a/src/StdLDrivers/StdLDrivers.cxx b/src/StdLDrivers/StdLDrivers.cxx
index 73fcdfd..547b9bd 100644 (file)
--- a/src/StdLDrivers/StdLDrivers.cxx
+++ b/src/StdLDrivers/StdLDrivers.cxx
@@ -21,6 +21,9 @@
 #include <Standard_GUID.hxx>
 #include <Plugin_Macro.hxx>
 
+#include <PCDM_StorageDriver.hxx>
+#include <TDocStd_Application.hxx>
+
 static Standard_GUID StdLRetrievalDriver ("bd696001-5b34-11d1-b5ba-00a0c9064368");
 
 //=======================================================================
@@ -44,6 +47,16 @@ Handle(Standard_Transient) StdLDrivers::Factory (const Standard_GUID& aGUID)
   return NULL;
 }
 
+//=======================================================================
+//function : DefineFormat
+//purpose  : 
+//=======================================================================
+void StdLDrivers::DefineFormat (const Handle(TDocStd_Application)& theApp)
+{
+  theApp->DefineFormat ("OCC-StdLite", "Lite OCAF Document", "stdl",
+                        new StdLDrivers_DocumentRetrievalDriver, 0);
+}
+
 //=======================================================================
 //function : BindTypes
 //purpose  : Register types