Mercurial > hg > octave-lyh
comparison liboctave/Array-util.cc @ 7241:da540e715d05
[project @ 2007-12-03 22:55:20 by jwe]
author | jwe |
---|---|
date | Mon, 03 Dec 2007 22:55:21 +0000 |
parents | a1dbe9d80eee |
children | 9a4541c622b5 |
comparison
equal
deleted
inserted
replaced
7240:3a695b7adf8e | 7241:da540e715d05 |
---|---|
449 } | 449 } |
450 | 450 |
451 return retval; | 451 return retval; |
452 } | 452 } |
453 | 453 |
454 int | |
455 permute_vector_compare (const void *a, const void *b) | |
456 { | |
457 const permute_vector *pva = static_cast<const permute_vector *> (a); | |
458 const permute_vector *pvb = static_cast<const permute_vector *> (b); | |
459 | |
460 return pva->pidx > pvb->pidx; | |
461 } | |
462 | |
463 | |
454 void | 464 void |
455 gripe_nonconformant (const char *op, int op1_len, int op2_len) | 465 gripe_nonconformant (const char *op, int op1_len, int op2_len) |
456 { | 466 { |
457 (*current_liboctave_error_handler) | 467 (*current_liboctave_error_handler) |
458 ("%s: nonconformant arguments (op1 len: %d, op2 len: %d)", | 468 ("%s: nonconformant arguments (op1 len: %d, op2 len: %d)", |