0024057: Eliminate compiler warning C4100 in MSVC++ with warning level 4
[occt.git] / src / IGESAppli / IGESAppli_LevelToPWBLayerMap.cxx
CommitLineData
b311480e 1// Created by: CKY / Contract Toubro-Larsen
2// Copyright (c) 1993-1999 Matra Datavision
3// Copyright (c) 1999-2012 OPEN CASCADE SAS
4//
5// The content of this file is subject to the Open CASCADE Technology Public
6// License Version 6.5 (the "License"). You may not use the content of this file
7// except in compliance with the License. Please obtain a copy of the License
8// at http://www.opencascade.org and read it completely before using this file.
7fd59977 9//
b311480e 10// The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
11// main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
7fd59977 12//
b311480e 13// The Original Code and all software distributed under the License is
14// distributed on an "AS IS" basis, without warranty of any kind, and the
15// Initial Developer hereby disclaims all such warranties, including without
16// limitation, any warranties of merchantability, fitness for a particular
17// purpose or non-infringement. Please see the License for the specific terms
18// and conditions governing the rights and limitations under the License.
19
20//--------------------------------------------------------------------
7fd59977 21//--------------------------------------------------------------------
22
23#include <IGESAppli_LevelToPWBLayerMap.ixx>
24
25
b311480e 26IGESAppli_LevelToPWBLayerMap::IGESAppli_LevelToPWBLayerMap () { }
7fd59977 27
28
29 void IGESAppli_LevelToPWBLayerMap::Init
30 (const Standard_Integer nbPropVal,
31 const Handle(TColStd_HArray1OfInteger)& allExchLevels,
32 const Handle(Interface_HArray1OfHAsciiString)& allNativeLevels,
33 const Handle(TColStd_HArray1OfInteger)& allPhysLevels,
34 const Handle(Interface_HArray1OfHAsciiString)& allExchIdents)
35{
36 Standard_Integer num = allExchLevels->Length();
37 if ( allExchLevels->Lower() != 1 ||
38 (allNativeLevels->Lower() != 1 || allNativeLevels->Length() != num) ||
39 (allPhysLevels->Lower() != 1 || allPhysLevels->Length() != num) ||
40 (allExchIdents->Lower() != 1 || allExchIdents->Length() != num) )
41 Standard_DimensionMismatch::Raise("IGESAppli_LevelToPWBLayerMap: Init");
42 theNbPropertyValues = nbPropVal;
43 theExchangeFileLevelNumber = allExchLevels;
44 theNativeLevel = allNativeLevels;
45 thePhysicalLayerNumber = allPhysLevels;
46 theExchangeFileLevelIdent = allExchIdents;
47 InitTypeAndForm(406,24);
48}
49
50 Standard_Integer IGESAppli_LevelToPWBLayerMap::NbPropertyValues () const
51{
52 return theNbPropertyValues;
53}
54
55 Standard_Integer IGESAppli_LevelToPWBLayerMap::NbLevelToLayerDefs () const
56{
57 return theExchangeFileLevelNumber->Length();
58}
59
60 Standard_Integer IGESAppli_LevelToPWBLayerMap::ExchangeFileLevelNumber
61 (const Standard_Integer Index) const
62{
63 return theExchangeFileLevelNumber->Value(Index);
64}
65
66 Handle(TCollection_HAsciiString) IGESAppli_LevelToPWBLayerMap::NativeLevel
67 (const Standard_Integer Index) const
68{
69 return theNativeLevel->Value(Index);
70}
71
72 Standard_Integer IGESAppli_LevelToPWBLayerMap::PhysicalLayerNumber
73 (const Standard_Integer Index) const
74{
75 return thePhysicalLayerNumber->Value(Index);
76}
77
78 Handle(TCollection_HAsciiString) IGESAppli_LevelToPWBLayerMap::ExchangeFileLevelIdent
79 (const Standard_Integer Index) const
80{
81 return theExchangeFileLevelIdent->Value(Index);
82}