0024927: Getting rid of "Persistent" functionality -- Code
[occt.git] / src / MDF / MDF_Tool.cdl
diff --git a/src/MDF/MDF_Tool.cdl b/src/MDF/MDF_Tool.cdl
deleted file mode 100644 (file)
index 5622494..0000000
+++ /dev/null
@@ -1,93 +0,0 @@
--- Created by: DAUTRY Philippe
--- Copyright (c) 1997-1999 Matra Datavision
--- Copyright (c) 1999-2014 OPEN CASCADE SAS
---
--- This file is part of Open CASCADE Technology software library.
---
--- This library is free software; you can redistribute it and/or modify it under
--- the terms of the GNU Lesser General Public License version 2.1 as published
--- by the Free Software Foundation, with special exception defined in the file
--- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
--- distribution for complete text of the license and disclaimer of any warranty.
---
--- Alternatively, this file may be used under the terms of Open CASCADE
--- commercial license or contractual agreement.
-
---             --------------
-
----Version:    0.0
---Version      Date            Purpose
---             0.0     Mar 13 1997     Creation
-
-
-class Tool from MDF
-
-       ---Purpose: A tool to translate...
-
-uses
-
-    Label                  from TDF,
-    Data                   from TDF,
-    Data                   from PDF,
-    HAttributeArray1       from PDF,
-    TypeARDriverMap        from MDF,
-    TypeASDriverMap        from MDF,
-    ARDriverTable          from MDF,
-    ASDriverTable          from MDF,
-    RRelocationTable       from MDF,
-    SRelocationTable       from MDF,
-    Integer                from Standard,
-    HArray1OfInteger       from PColStd,
-    TransientPersistentMap from PTColStd
-
--- raises
-
-is
-
-    WriteLabels(myclass;
-         aSource : Data from TDF;
-         aTarget : Data from PDF;
-         aDriverMap    : TypeASDriverMap from MDF;
-         aReloc        : SRelocationTable from MDF);
-       ---Purpose: Writes the labels with empty attributes.
-
-    WriteLabels(myclass;
-         aSourceLab    : Label from TDF;
-         theLabels     : HArray1OfInteger from PColStd;
-         theAttributes : HAttributeArray1 from PDF;
-         aDriverMap    : TypeASDriverMap from MDF;
-         aReloc        : SRelocationTable from MDF;
-         labAlloc      : in out Integer from Standard;
-         attAlloc      : in out Integer from Standard);
-       ---Purpose: Used for recursivity.
-
-    WriteAttributes(myclass;
-       aDriverMap    : TypeASDriverMap from MDF;
-       aReloc        : SRelocationTable from MDF);
-       ---Purpose: Writes attributes content.
-
-
-
-    ReadLabels(myclass;
-         aSource : Data from PDF;
-         aTarget : Data from TDF;
-         aDriverMap    : TypeARDriverMap from MDF;
-         aReloc        : RRelocationTable from MDF);
-       ---Purpose:  Reads the labels abd adds empty attributes to them.
-
-    ReadLabels(myclass;
-         anIns         : in out Label from TDF;
-         theLabels     : HArray1OfInteger from PColStd;
-         theAttributes : HAttributeArray1 from PDF;
-         aDriverMap    : TypeARDriverMap from MDF;
-         aReloc        : RRelocationTable from MDF;
-         labRead       : in out Integer from Standard;
-         attRead       : in out Integer from Standard);
-       ---Purpose: Used for recursivity.
-
-    ReadAttributes(myclass;
-       aDriverMap    : TypeARDriverMap from MDF;
-       aReloc        : RRelocationTable from MDF);
-       ---Purpose: Reads attributes content and paste them.
-
-end Tool;