Mercurial > octave-nkf

changeset 17843:573f865aa8c8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
use gnulib frexp module * bootstrap.conf (gnulib_modules): Include frexp and frexpf. * lo-mappers.cc (xlog2): Use gnulib::frexp. * oct-inttypes.h (dblesplit): Use gnulib::frexp. * data.cc (Feps): Use gnulib::frexp.
author John W. Eaton <jwe@octave.org>
date Mon, 04 Nov 2013 01:19:05 -0500
parents 7533f4482006
children e88a8fa25125
files bootstrap.conf libinterp/corefcn/data.cc liboctave/numeric/lo-mappers.cc liboctave/util/oct-inttypes.cc
diffstat 4 files changed, 7 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/bootstrap.conf	Fri Nov 01 22:14:37 2013 -0400
+++ b/bootstrap.conf	Mon Nov 04 01:19:05 2013 -0500
@@ -38,6 +38,8 @@
   fnmatch
   fopen
   fpucw
+  frexp
+  frexpf
   fseek
   ftell
   getcwd
--- a/libinterp/corefcn/data.cc	Fri Nov 01 22:14:37 2013 -0400
+++ b/libinterp/corefcn/data.cc	Mon Nov 04 01:19:05 2013 -0500
@@ -4173,7 +4173,7 @@
                   else
                     {
                       int expon;
-                      frexpf (val, &expon);
+                      gnulib::frexpf (val, &expon);
                       epsval(i) = std::pow (static_cast <float> (2.0),
                                             static_cast <float> (expon - 24));
                     }
@@ -4199,7 +4199,7 @@
                   else
                     {
                       int expon;
-                      frexp (val, &expon);
+                      gnulib::frexp (val, &expon);
                       epsval(i) = std::pow (static_cast <double> (2.0),
                                             static_cast <double> (expon - 53));
                     }
--- a/liboctave/numeric/lo-mappers.cc	Fri Nov 01 22:14:37 2013 -0400
+++ b/liboctave/numeric/lo-mappers.cc	Mon Nov 04 01:19:05 2013 -0500
@@ -136,7 +136,7 @@
 double
 xlog2 (double x, int& exp)
 {
-  return frexp (x, &exp);
+  return gnulib::frexp (x, &exp);
 }
 
 Complex
@@ -365,7 +365,7 @@
 float
 xlog2 (float x, int& exp)
 {
-  return frexpf (x, &exp);
+  return gnulib::frexpf (x, &exp);
 }
 
 FloatComplex
--- a/liboctave/util/oct-inttypes.cc	Fri Nov 01 22:14:37 2013 -0400
+++ b/liboctave/util/oct-inttypes.cc	Mon Nov 04 01:19:05 2013 -0500
@@ -380,7 +380,7 @@
 dblesplit (double x, bool& sign, uint64_t& mtis, int& exp)
 {
   sign = x < 0; x = fabs (x);
-  x = frexp (x, &exp);
+  x = gnulib::frexp (x, &exp);
   exp -= 52;
   mtis = static_cast<uint64_t> (ldexp (x, 52));
 }