1 //--------------------------------------------------------------------
3 // File Name : IGESBasic_ExternalRefFileIndex.cxx
5 // Author : CKY / Contract Toubro-Larsen
6 // Copyright : MATRA-DATAVISION 1993
8 //--------------------------------------------------------------------
10 #include <IGESBasic_ExternalRefFileIndex.ixx>
13 IGESBasic_ExternalRefFileIndex::IGESBasic_ExternalRefFileIndex () { }
15 void IGESBasic_ExternalRefFileIndex::Init
16 (const Handle(Interface_HArray1OfHAsciiString)& aNameArray,
17 const Handle(IGESData_HArray1OfIGESEntity)& allEntities)
19 if (aNameArray->Lower() != 1 || allEntities->Lower() != 1 ||
20 aNameArray->Length() != allEntities->Length())
21 Standard_DimensionMismatch::Raise("IGESBasic_ExternalRefFileIndex: Init");
23 theNames = aNameArray;
24 theEntities = allEntities;
25 InitTypeAndForm(402,12);
28 Standard_Integer IGESBasic_ExternalRefFileIndex::NbEntries () const
30 return theNames->Length();
33 Handle(TCollection_HAsciiString) IGESBasic_ExternalRefFileIndex::Name
34 (const Standard_Integer Index) const
36 return theNames->Value(Index);
39 Handle(IGESData_IGESEntity) IGESBasic_ExternalRefFileIndex::Entity
40 (const Standard_Integer Index) const
42 return theEntities->Value(Index);