Mercurial > octave-nkf
changeset 3873:da64ef591f18
[project @ 2002-02-23 03:04:25 by jwe]
author | jwe |
---|---|
date | Sat, 23 Feb 2002 03:04:25 +0000 |
parents | 57d51184b669 |
children | 24bf1bcbba8a |
files | liboctave/ChangeLog liboctave/lo-mappers.cc |
diffstat | 2 files changed, 5 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/liboctave/ChangeLog Sat Feb 23 02:54:08 2002 +0000 +++ b/liboctave/ChangeLog Sat Feb 23 03:04:25 2002 +0000 @@ -1,3 +1,7 @@ +2002-02-22 Paul Kienzle <pkienzle@jazz.ncnr.nist.gov> + + * lo-mappers.cc (arg): Simply call atan2 (0.0, x). + 2001-12-17 John W. Eaton <jwe@bevo.che.wisc.edu> * data-conv.cc (LS_DO_READ): Don't do anything unless len > 0.
--- a/liboctave/lo-mappers.cc Sat Feb 23 02:54:08 2002 +0000 +++ b/liboctave/lo-mappers.cc Sat Feb 23 03:04:25 2002 +0000 @@ -62,14 +62,7 @@ double arg (double x) { - if (x < 0.0) - return M_PI; - else -#if defined (HAVE_ISNAN) - return xisnan (x) ? octave_NaN : 0.0; -#else - return 0.0; -#endif + return atan2 (0.0, x); } double