Integration of OCCT 6.5.0 from SVN

src/RWStepShape/RWStepShape_RWSphere.cxx

@@ -0,0 +1,75 @@
+
+#include <RWStepShape_RWSphere.ixx>
+#include <StepGeom_Point.hxx>
+
+
+#include <Interface_EntityIterator.hxx>
+
+
+#include <StepShape_Sphere.hxx>
+
+
+RWStepShape_RWSphere::RWStepShape_RWSphere () {}
+
+void RWStepShape_RWSphere::ReadStep
+	(const Handle(StepData_StepReaderData)& data,
+	 const Standard_Integer num,
+	 Handle(Interface_Check)& ach,
+	 const Handle(StepShape_Sphere)& ent) const
+{
+
+
+	// --- Number of Parameter Control ---
+
+	if (!data->CheckNbParams(num,3,ach,"sphere")) return;
+
+	// --- inherited field : name ---
+
+	Handle(TCollection_HAsciiString) aName;
+	//szv#4:S4163:12Mar99 `Standard_Boolean stat1 =` not needed
+	data->ReadString (num,1,"name",ach,aName);
+
+	// --- own field : radius ---
+
+	Standard_Real aRadius;
+	//szv#4:S4163:12Mar99 `Standard_Boolean stat2 =` not needed
+	data->ReadReal (num,2,"radius",ach,aRadius);
+
+	// --- own field : centre ---
+
+	Handle(StepGeom_Point) aCentre;
+	//szv#4:S4163:12Mar99 `Standard_Boolean stat3 =` not needed
+	data->ReadEntity(num, 3,"centre", ach, STANDARD_TYPE(StepGeom_Point), aCentre);
+
+	//--- Initialisation of the read entity ---
+
+
+	ent->Init(aName, aRadius, aCentre);
+}
+
+
+void RWStepShape_RWSphere::WriteStep
+	(StepData_StepWriter& SW,
+	 const Handle(StepShape_Sphere)& ent) const
+{
+
+	// --- inherited field name ---
+
+	SW.Send(ent->Name());
+
+	// --- own field : radius ---
+
+	SW.Send(ent->Radius());
+
+	// --- own field : centre ---
+
+	SW.Send(ent->Centre());
+}
+
+
+void RWStepShape_RWSphere::Share(const Handle(StepShape_Sphere)& ent, Interface_EntityIterator& iter) const
+{
+
+	iter.GetOneItem(ent->Centre());
+}
+