Mercurial > hg > octave-nkf
diff libinterp/corefcn/data.cc @ 19310:9c5a17d5fc19
Deprecate fmod function.
* NEWS: Announce deprecation.
* scripts/deprecated/fmod.m: New m-file to replace C++ function and issue
deprecated warning.
* scripts/deprecated/module.mk: Add fmod.m to build system.
* data.cc: Remove DEFALIAS of fmod to rem. Replace fmod with rem in %!tests.
* datetick.m: Replace fmod usage with rem.
| author | Rik <rik@octave.org> |
|---|---|
| date | Sat, 20 Sep 2014 20:31:16 -0700 |
| parents | ba442cd7f7c3 |
| children | 0f9c5a15c8fa |
line wrap: on
line diff
--- a/libinterp/corefcn/data.cc +++ b/libinterp/corefcn/data.cc @@ -576,8 +576,7 @@ DEFUN (rem, args, , "-*- texinfo -*-\n\ -@deftypefn {Mapping Function} {} rem (@var{x}, @var{y})\n\ -@deftypefnx {Mapping Function} {} fmod (@var{x}, @var{y})\n\ +@deftypefn {Mapping Function} {} rem (@var{x}, @var{y})\n\ Return the remainder of the division @code{@var{x} / @var{y}}, computed\n\ using the expression\n\ \n\ @@ -677,11 +676,11 @@ } /* -%!assert (size (fmod (zeros (0, 2), zeros (0, 2))), [0, 2]) -%!assert (size (fmod (rand (2, 3, 4), zeros (2, 3, 4))), [2, 3, 4]) -%!assert (size (fmod (rand (2, 3, 4), 1)), [2, 3, 4]) -%!assert (size (fmod (1, rand (2, 3, 4))), [2, 3, 4]) -%!assert (size (fmod (1, 2)), [1, 1]) +%!assert (size (rem (zeros (0, 2), zeros (0, 2))), [0, 2]) +%!assert (size (rem (rand (2, 3, 4), zeros (2, 3, 4))), [2, 3, 4]) +%!assert (size (rem (rand (2, 3, 4), 1)), [2, 3, 4]) +%!assert (size (rem (1, rand (2, 3, 4))), [2, 3, 4]) +%!assert (size (rem (1, 2)), [1, 1]) %!assert (rem ([1, 2, 3; -1, -2, -3], 2), [1, 0, 1; -1, 0, -1]) %!assert (rem ([1, 2, 3; -1, -2, -3], 2 * ones (2, 3)),[1, 0, 1; -1, 0, -1]) @@ -727,8 +726,6 @@ %!assert (rem (0.94, 0.01), 0.0); */ -DEFALIAS (fmod, rem) - DEFUN (mod, args, , "-*- texinfo -*-\n\ @deftypefn {Mapping Function} {} mod (@var{x}, @var{y})\n\