0023022: This is desirable to access OpenGl extensions and core API (1.2+) in one...
[occt.git] / src / RWStepShape / RWStepShape_RWLoop.cxx
CommitLineData
7fd59977 1
2#include <RWStepShape_RWLoop.ixx>
3
4
5RWStepShape_RWLoop::RWStepShape_RWLoop () {}
6
7void RWStepShape_RWLoop::ReadStep
8 (const Handle(StepData_StepReaderData)& data,
9 const Standard_Integer num,
10 Handle(Interface_Check)& ach,
11 const Handle(StepShape_Loop)& ent) const
12{
13
14
15 // --- Number of Parameter Control ---
16
17 if (!data->CheckNbParams(num,1,ach,"loop")) return;
18
19 // --- inherited field : name ---
20
21 Handle(TCollection_HAsciiString) aName;
22 //szv#4:S4163:12Mar99 `Standard_Boolean stat1 =` not needed
23 data->ReadString (num,1,"name",ach,aName);
24
25 //--- Initialisation of the read entity ---
26
27
28 ent->Init(aName);
29}
30
31
32void RWStepShape_RWLoop::WriteStep
33 (StepData_StepWriter& SW,
34 const Handle(StepShape_Loop)& ent) const
35{
36
37 // --- inherited field name ---
38
39 SW.Send(ent->Name());
40}