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
30 #include "SALOMEDS_AttributeSequenceOfInteger_i.hxx"
31 #include "SALOMEDS_SObject_i.hxx"
32 #include <TColStd_HSequenceOfInteger.hxx>
35 void SALOMEDS_AttributeSequenceOfInteger_i::Assign(const SALOMEDS::LongSeq& other)
38 Handle(TColStd_HSequenceOfInteger) CasCadeSeq = new TColStd_HSequenceOfInteger;
39 for (int i = 0; i < other.length(); i++) {
40 CasCadeSeq->Append(other[i]);
42 Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Assign(CasCadeSeq);
45 SALOMEDS::LongSeq* SALOMEDS_AttributeSequenceOfInteger_i::CorbaSequence()
47 SALOMEDS::LongSeq_var CorbaSeq = new SALOMEDS::LongSeq;
48 Handle(SALOMEDS_SequenceOfIntegerAttribute) CasCadeSeq = Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr);
49 CorbaSeq->length(CasCadeSeq->Length());
50 for (int i = 0; i < CasCadeSeq->Length(); i++) {
51 CorbaSeq[i] = CasCadeSeq->Value(i+1);;
53 return CorbaSeq._retn();
56 void SALOMEDS_AttributeSequenceOfInteger_i::Add(CORBA::Long value)
59 Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Add(value);
62 void SALOMEDS_AttributeSequenceOfInteger_i::Remove(CORBA::Long index)
65 Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Remove(index);
68 void SALOMEDS_AttributeSequenceOfInteger_i::ChangeValue(CORBA::Long index, CORBA::Long value)
71 Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->ChangeValue(index, value);
74 CORBA::Long SALOMEDS_AttributeSequenceOfInteger_i::Value(CORBA::Short index)
76 return Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Value(index);
79 CORBA::Long SALOMEDS_AttributeSequenceOfInteger_i::Length()
81 return Handle(SALOMEDS_SequenceOfIntegerAttribute)::DownCast(_myAttr)->Length();