Mercurial > octave

diff liboctave/lo-mappers.cc @ 3873:da64ef591f18

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-02-23 03:04:25 by jwe]
author jwe
date Sat, 23 Feb 2002 03:04:25 +0000
parents b4f260ddd748
children cfb762dc9259
line wrap: on
line diff
--- 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