Mercurial > hg > octave-nkf

diff liboctave/lo-mappers.cc @ 11010:9478b216752e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
simplify more array tests
author Jaroslav Hajek <highegg@gmail.com>
date Wed, 22 Sep 2010 07:06:25 +0200
parents 4d1fc073fbb7
children 94d9d412a2a0
line wrap: on
line diff
--- a/liboctave/lo-mappers.cc
+++ b/liboctave/lo-mappers.cc
@@ -702,3 +702,9 @@
 {
   return x < 0.0f ? FloatComplex (0.0f, sqrtf (-x)) : FloatComplex (sqrtf (x));
 }
+
+bool xnegative_sign (double x)
+{ return __lo_ieee_signbit (x); }
+
+bool xnegative_sign (float x)
+{ return __lo_ieee_float_signbit (x); }