0024057: Eliminate compiler warning C4100 in MSVC++ with warning level 4
[occt.git] / src / IGESAppli / IGESAppli_LevelToPWBLayerMap.cxx
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.
9 //
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.
12 //
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 //--------------------------------------------------------------------
21 //--------------------------------------------------------------------
22
23 #include <IGESAppli_LevelToPWBLayerMap.ixx>
24
25
26 IGESAppli_LevelToPWBLayerMap::IGESAppli_LevelToPWBLayerMap ()    {  }
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 }