Mercurial > octave-nkf

comparison src/DLD-FUNCTIONS/sort.cc @ 5010:6ff7d9d61b57

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-09-21 01:14:26 by jwe]
author jwe
date Tue, 21 Sep 2004 01:14:26 +0000
parents 000cfedea91c
children 57077d0ddc8e
comparison
equal deleted inserted replaced
5009:000cfedea91c 5010:6ff7d9d61b57
302 for (unsigned int i = 0; i < static_cast<unsigned int> (dim); i++) 302 for (unsigned int i = 0; i < static_cast<unsigned int> (dim); i++)
303 stride *= dv(i); 303 stride *= dv(i);
304 304
305 double *v = m.fortran_vec (); 305 double *v = m.fortran_vec ();
306 306
307 unsigned EIGHT_BYTE_INT *p = (unsigned EIGHT_BYTE_INT *)v; 307 unsigned EIGHT_BYTE_INT *p = reinterpret_cast<unsigned EIGHT_BYTE_INT *> (v);
308 308
309 octave_sort<unsigned EIGHT_BYTE_INT> sort; 309 octave_sort<unsigned EIGHT_BYTE_INT> sort;
310 310
311 if (mode == ASCENDING) 311 if (mode == ASCENDING)
312 sort.set_compare (ascending_compare); 312 sort.set_compare (ascending_compare);
438 for (unsigned int i = 0; i < static_cast<unsigned int> (dim); i++) 438 for (unsigned int i = 0; i < static_cast<unsigned int> (dim); i++)
439 stride *= dv(i); 439 stride *= dv(i);
440 440
441 double *v = m.fortran_vec (); 441 double *v = m.fortran_vec ();
442 442
443 unsigned EIGHT_BYTE_INT *p = (unsigned EIGHT_BYTE_INT *)v; 443 unsigned EIGHT_BYTE_INT *p = reinterpret_cast<unsigned EIGHT_BYTE_INT *> (v);
444 444
445 octave_sort<vec_index<unsigned EIGHT_BYTE_INT> *> indexed_sort; 445 octave_sort<vec_index<unsigned EIGHT_BYTE_INT> *> indexed_sort;
446 446
447 if (mode == ASCENDING) 447 if (mode == ASCENDING)
448 indexed_sort.set_compare (ascending_compare); 448 indexed_sort.set_compare (ascending_compare);