1 // SALOME SALOMEDS : data structure of SALOME and sources of Salome data server
3 // Copyright (C) 2003 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License.
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // Lesser General Public License for more details.
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 // See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
24 // File : SALOMEDS_AttributeSequenceOfInteger_i.cxx
25 // Author : Yves FRICAUD
29 #include "SALOMEDS_AttributeSequenceOfInteger_i.hxx"
30 #include "SALOMEDS_SObject_i.hxx"
31 #include <TColStd_HSequenceOfInteger.hxx>
34 void SALOMEDS_AttributeSequenceOfInteger_i::Assign(const SALOMEDS::LongSeq& other)
37 Handle(TColStd_HSequenceOfInteger) CasCadeSeq = new TColStd_HSequenceOfInteger;
38 for (int i = 0; i < other.length(); i++) {
39 CasCadeSeq->Append(other[i]);
41 Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Assign(CasCadeSeq);
44 SALOMEDS::LongSeq* SALOMEDS_AttributeSequenceOfInteger_i::CorbaSequence()
46 SALOMEDS::LongSeq_var CorbaSeq = new SALOMEDS::LongSeq;
47 Handle(SALOMEDS_SequenceOfIntegerAttribute) CasCadeSeq = Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr);
48 CorbaSeq->length(CasCadeSeq->Length());
49 for (int i = 0; i < CasCadeSeq->Length(); i++) {
50 CorbaSeq[i] = CasCadeSeq->Value(i+1);;
52 return CorbaSeq._retn();
55 void SALOMEDS_AttributeSequenceOfInteger_i::Add(CORBA::Long value)
58 Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Add(value);
61 void SALOMEDS_AttributeSequenceOfInteger_i::Remove(CORBA::Long index)
64 Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Remove(index);
67 void SALOMEDS_AttributeSequenceOfInteger_i::ChangeValue(CORBA::Long index, CORBA::Long value)
70 Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->ChangeValue(index, value);
73 CORBA::Long SALOMEDS_AttributeSequenceOfInteger_i::Value(CORBA::Short index)
75 return Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Value(index);
78 CORBA::Long SALOMEDS_AttributeSequenceOfInteger_i::Length()
80 return Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Length();