Mercurial > octave-nkf
comparison test/build-sparse-tests.sh @ 18195:1b6db9303933
allow toupper and tolower to handle numeric values (bug #33537)
* ov-base-sparse.cc (octave_base_sparse<T>::map):
Special case for umap_xtolower and umap_xtoupper.
* ov-float.cc (octave_float_scalar::map): Likewise.
* ov-flt-re-mat.cc (octave_float_matrix::map): Likewise.
* ov-intx.h (OCTAVE_VALUE_INT_MATRIX_T::map,
OCTAVE_VALUE_INT_SCALAR_T::map): Likewise.
* ov-re-mat.cc (octave_matrix::map): Likewise.
* ov-scalar.cc (octave_scalar::map): Likewise.
* build-sparse-tests.sh, mappers.cc: Update tests.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 02 Jan 2014 22:44:37 -0500 |
parents | 501cb6a90f0f |
children | 3cb64f94294f |
comparison
equal
deleted
inserted
replaced
18194:1461b9cfac4e | 18195:1b6db9303933 |
---|---|
511 #print_real_mapper_test lgamma 1 | 511 #print_real_mapper_test lgamma 1 |
512 | 512 |
513 # Specific tests for certain mapper functions | 513 # Specific tests for certain mapper functions |
514 cat >>$TESTS <<EOF | 514 cat >>$TESTS <<EOF |
515 | 515 |
516 %% These mapper functions always return a full matrix | |
517 %!test | 516 %!test |
518 %! wn2s = warning ("query", "Octave:num-to-str"); | 517 %! wn2s = warning ("query", "Octave:num-to-str"); |
519 %! warning ("off", "Octave:num-to-str"); | 518 %! warning ("off", "Octave:num-to-str"); |
520 %! if (isreal (af)) | 519 %! if (isreal (af)) |
521 %! assert (toascii (as), toascii (af)); | 520 %! assert (toascii (as), toascii (af)); |
522 %! assert (tolower (as), tolower (af)); | 521 %! assert (tolower (as), as); |
523 %! assert (toupper (as), toupper (af)); | 522 %! assert (toupper (as), as); |
524 %! endif | 523 %! endif |
525 %! warning (wn2s.state, "Octave:num-to-str"); | 524 %! warning (wn2s.state, "Octave:num-to-str"); |
526 | 525 |
527 EOF | 526 EOF |
528 } | 527 } |