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

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

diff --git a/src/float/lfloat/misc/cl_LF_lenincx.cc b/src/float/lfloat/misc/cl_LF_lenincx.cc
index e949a96e66752d2a9aeeb0daf6dc8642080ddbd2..0a670f6c7767d17651ab0e5a8162dc88019bd8d5 100644 (file)
--- a/src/float/lfloat/misc/cl_LF_lenincx.cc
+++ b/src/float/lfloat/misc/cl_LF_lenincx.cc
@@ -9,6 +9,8 @@
 
 // Implementation.
 
+namespace cln {
+
 uintC cl_LF_len_incsqrtx (uintC n)
 {
 // Methode bei intDsize=16:
@@ -18,9 +20,9 @@ uintC cl_LF_len_incsqrtx (uintC n)
 // <==>       intDsize*n < intDsize^2*inc^2 - 66*intDsize*inc + 1089
 // <==>       n <= intDsize*inc^2 - 66*inc + floor(1089/intDsize)
        return
-         #define NMAX(k)  (uintL)((intDsize*(k)-66)*(k)+floor(1089,intDsize))
+         #define NMAX(k)  (uintC)((intDsize*(k)-66)*(k)+floor(1089,intDsize))
          #define FITS(n,k)  ((intDsize*(k) > 33) && ((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) */                 \
@@ -44,3 +46,5 @@ uintC cl_LF_len_incsqrtx (uintC n)
          // No TEST(14), because NMAX(1UL<<14) is already out of range.
          n_max;
 }
+
+}  // namespace cln