Mercurial > octave-nkf

comparison liboctave/idx-vector.cc @ 8301:f7d44b6a74df

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix out-of-bounds checks in null assignments
author Jaroslav Hajek <highegg@gmail.com>
date Sun, 02 Nov 2008 06:15:11 +0100
parents 7cbe01c21986
children c374691576f6
comparison
equal deleted inserted replaced
8300:4b9bce36109b 8301:f7d44b6a74df
516 516
517 octave_idx_type len = cnt, *data = new octave_idx_type[len]; 517 octave_idx_type len = cnt, *data = new octave_idx_type[len];
518 for (octave_idx_type i = 0, j = 0; i < n; i++) 518 for (octave_idx_type i = 0, j = 0; i < n; i++)
519 if (left[i]) data[j++] = i; 519 if (left[i]) data[j++] = i;
520 520
521 return new idx_vector_rep (data, len, data[len-1], dim_vector (1, len), DIRECT); 521 return new idx_vector_rep (data, len,
522 len ? data[len-1]+1 : 0,
523 dim_vector (1, len), DIRECT);
522 } 524 }
523 525
524 octave_idx_type 526 octave_idx_type
525 idx_vector::freeze (octave_idx_type z_len, const char *tag, bool resize_ok) 527 idx_vector::freeze (octave_idx_type z_len, const char *tag, bool resize_ok)
526 { 528 {