Mercurial > octave

comparison liboctave/Array.cc @ 7241:da540e715d05

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-12-03 22:55:20 by jwe]
author jwe
date Mon, 03 Dec 2007 22:55:21 +0000
parents e8d953d03f6a
children 359f464342b3
comparison
equal deleted inserted replaced
7240:3a695b7adf8e 7241:da540e715d05
399 retval = *this; 399 retval = *this;
400 400
401 return retval; 401 return retval;
402 } 402 }
403 403
404 struct 404
405 permute_vector
406 {
407 octave_idx_type pidx;
408 octave_idx_type iidx;
409 };
410
411 static int
412 permute_vector_compare (const void *a, const void *b)
413 {
414 const permute_vector *pva = static_cast<const permute_vector *> (a);
415 const permute_vector *pvb = static_cast<const permute_vector *> (b);
416
417 return pva->pidx > pvb->pidx;
418 }
419 405
420 template <class T> 406 template <class T>
421 Array<T> 407 Array<T>
422 Array<T>::permute (const Array<octave_idx_type>& perm_vec_arg, bool inv) const 408 Array<T>::permute (const Array<octave_idx_type>& perm_vec_arg, bool inv) const
423 { 409 {