2006-04-25 Bruno Haible <bruno@clisp.org>

[cln.git] / src / float / lfloat / misc / cl_LF_leninc.cc

diff --git a/src/float/lfloat/misc/cl_LF_leninc.cc b/src/float/lfloat/misc/cl_LF_leninc.cc
index 34c35799293cd4bcefa02a5b2ed7e45b20a1794b..4266867c627db83ed076ebd415dac05af86b7a24 100644 (file)
--- a/src/float/lfloat/misc/cl_LF_leninc.cc
+++ b/src/float/lfloat/misc/cl_LF_leninc.cc
@@ -9,6 +9,8 @@
 
 // Implementation.
 
+namespace cln {
+
 uintC cl_LF_len_incsqrt (uintC n)
 {
 // Methode bei intDsize=16:
@@ -25,9 +27,9 @@ uintC cl_LF_len_incsqrt (uintC n)
 // <==>       intDsize*n < intDsize^2*inc^2 - 4*intDsize*inc + 4
 // <==>       n <= intDsize*inc^2 - 4*inc
        return
-         #define NMAX(k)  (uintL)((intDsize*(k)-4)*(k))
+         #define NMAX(k)  (uintC)((intDsize*(k)-4)*(k))
          #define FITS(n,k)  ((n) <= NMAX(k))
-         #define n_max  (uintL)(bitm(intCsize)-1)
+         #define n_max  (uintC)(bitm(intCsize)-1)
          #define TRYINC(inc)  FITS(n_max,inc) || FITS(n,inc) ? RETINC(inc) :
          #define RETINC(inc)  \
            /* at this point we know  n <= NMAX(inc) */                 \
@@ -51,3 +53,5 @@ uintC cl_LF_len_incsqrt (uintC n)
          // No TEST(14), because NMAX(1UL<<14) is already out of range.
          n_max;
 }
+
+}  // namespace cln