comparison src/data.cc @ 7743:fbe27e477578

more tests fixed
author John W. Eaton <jwe@octave.org>
date Wed, 30 Apr 2008 14:25:31 -0400
parents 72c0489653ac
children 82be108cc558
comparison
equal deleted inserted replaced
7742:95ecf219a582 7743:fbe27e477578
885 } 885 }
886 886
887 /* 887 /*
888 %!assert (size (fmod (zeros (0, 2), zeros (0, 2))), [0, 2]) 888 %!assert (size (fmod (zeros (0, 2), zeros (0, 2))), [0, 2])
889 %!assert (size (fmod (rand (2, 3, 4), zeros (2, 3, 4))), [2, 3, 4]) 889 %!assert (size (fmod (rand (2, 3, 4), zeros (2, 3, 4))), [2, 3, 4])
890 %!assert (size (fmod (rand (2, 3, 4), 1), [2, 3, 4]) 890 %!assert (size (fmod (rand (2, 3, 4), 1)), [2, 3, 4])
891 %!assert (size (fmod (1, rand (2, 3, 4)), [2, 3, 4]) 891 %!assert (size (fmod (1, rand (2, 3, 4))), [2, 3, 4])
892 %!assert (size (fmod (1, 2), [1, 1]) 892 %!assert (size (fmod (1, 2)), [1, 1])
893 */ 893 */
894 894
895 #define NATIVE_REDUCTION_1(FCN, TYPE, DIM) \ 895 #define NATIVE_REDUCTION_1(FCN, TYPE, DIM) \
896 (arg.is_ ## TYPE ## _type ()) \ 896 (arg.is_ ## TYPE ## _type ()) \
897 { \ 897 { \