Integration of OCCT 6.5.0 from SVN

src/PFunction/PFunction.cdl

@@ -0,0 +1,18 @@
+-- File:	PFunction.cdl
+-- Created:	Thu Jun 17 10:55:04 1999
+-- Author:	Vladislav ROMASHKO
+--		<vro@flox.nnov.matra-dtv.fr>
+---Copyright:	 Matra Datavision 1999
+
+package PFunction 
+
+uses 
+     
+    PDF, 
+    Standard   
+    
+is 
+ 
+    class Function; 
+     
+end PFunction;    

src/PFunction/PFunction_Function.cdl

@@ -0,0 +1,32 @@
+-- File:	PFunction_Function.cdl
+-- Created:	Thu Jun 17 10:56:43 1999
+-- Author:	Vladislav ROMASHKO
+--		<vro@flox.nnov.matra-dtv.fr>
+---Copyright:	 Matra Datavision 1999
+
+class Function from PFunction inherits Attribute from PDF 
+
+uses 
+     
+    Attribute from PDF, 
+    GUID      from Standard 
+
+is
+
+    Create returns mutable Function from PFunction;
+        
+    SetDriverGUID(me : mutable; driverGUID : GUID from Standard);
+
+    GetDriverGUID(me) returns GUID from Standard;
+
+    GetFailure(me) returns Integer from Standard;
+    
+    SetFailure(me : mutable; mode : Integer from Standard);
+
+fields
+
+    myDriverGUID  : GUID     from Standard;
+    myFailure     : Integer  from Standard;
+
+end Function;
+ 

src/PFunction/PFunction_Function.cxx

@@ -0,0 +1,32 @@
+// File:	PFunction_Function.cxx
+// Created:	Thu Jun 17 11:03:48 1999
+// Author:	Vladislav ROMASHKO
+//		<vro@flox.nnov.matra-dtv.fr>
+
+
+#include <PFunction_Function.ixx>
+#include <Standard_GUID.hxx>
+
+PFunction_Function::PFunction_Function()
+{}
+
+void PFunction_Function::SetDriverGUID(const Standard_GUID& driverGUID)
+{
+  myDriverGUID = driverGUID;
+}
+
+Standard_GUID PFunction_Function::GetDriverGUID() const
+{
+  return myDriverGUID;
+}
+
+Standard_Integer PFunction_Function::GetFailure() const
+{
+  return myFailure;
+}
+
+void PFunction_Function::SetFailure(const Standard_Integer mode)
+{
+  myFailure = mode;
+}
+