0024042: Performance improvements: Foundation Classes
[occt.git] / src / TCollection / TCollection_Array1.gxx
1 // Copyright (c) 1993-1999 Matra Datavision
2 // Copyright (c) 1999-2012 OPEN CASCADE SAS
3 //
4 // The content of this file is subject to the Open CASCADE Technology Public
5 // License Version 6.5 (the "License"). You may not use the content of this file
6 // except in compliance with the License. Please obtain a copy of the License
7 // at http://www.opencascade.org and read it completely before using this file.
8 //
9 // The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
10 // main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
11 //
12 // The Original Code and all software distributed under the License is
13 // distributed on an "AS IS" basis, without warranty of any kind, and the
14 // Initial Developer hereby disclaims all such warranties, including without
15 // limitation, any warranties of merchantability, fitness for a particular
16 // purpose or non-infringement. Please see the License for the specific terms
17 // and conditions governing the rights and limitations under the License.
18
19 #include <Standard_DimensionMismatch.hxx>
20
21
22 //=======================================================================
23 //function : Assign
24 //purpose  : 
25 //=======================================================================
26
27 const TCollection_Array1& TCollection_Array1::Assign 
28   (const TCollection_Array1& Right)
29 {
30   if (&Right != this) {
31     Standard_Integer max = Length() ;
32     Standard_DimensionMismatch_Raise_if(max != Right.Length(),
33                                         "DimensionMismatch in Array1::Operator=");
34     
35     Array1Item* p       = &ChangeValue(myLowerBound);
36     const Array1Item* q = &Right.Value(Right.Lower());
37     for (Standard_Integer i=0; i<max; i++){
38       *p++ = *q++;
39     }
40   }
41   return *this;
42 }
43
44
45
46
47