Mercurial > hg > octave-nkf

comparison liboctave/CColVector.cc @ 1699:0c6d3b73bf69

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1996-01-07 02:36:50 by jwe]
author jwe
date Sun, 07 Jan 1996 02:40:17 +0000
parents 23aa282707e8
children 2ffe49eb95a5
comparison
equal deleted inserted replaced
1698:0892abda7553 1699:0c6d3b73bf69
76 76
77 ComplexColumnVector& 77 ComplexColumnVector&
78 ComplexColumnVector::insert (const ColumnVector& a, int r) 78 ComplexColumnVector::insert (const ColumnVector& a, int r)
79 { 79 {
80 int a_len = a.length (); 80 int a_len = a.length ();
81 if (r < 0 || r + a_len - 1 > length ()) 81 if (r < 0 || r + a_len > length ())
82 { 82 {
83 (*current_liboctave_error_handler) ("range error for insert"); 83 (*current_liboctave_error_handler) ("range error for insert");
84 return *this; 84 return *this;
85 } 85 }
86 86
92 92
93 ComplexColumnVector& 93 ComplexColumnVector&
94 ComplexColumnVector::insert (const ComplexColumnVector& a, int r) 94 ComplexColumnVector::insert (const ComplexColumnVector& a, int r)
95 { 95 {
96 int a_len = a.length (); 96 int a_len = a.length ();
97 if (r < 0 || r + a_len - 1 > length ()) 97 if (r < 0 || r + a_len > length ())
98 { 98 {
99 (*current_liboctave_error_handler) ("range error for insert"); 99 (*current_liboctave_error_handler) ("range error for insert");
100 return *this; 100 return *this;
101 } 101 }
102 102