X-Git-Url: https://ginac.de/CLN/cln.git//cln.git?a=blobdiff_plain;f=src%2Ffloat%2Flfloat%2Fmisc%2Fcl_LF_lenincx.cc;h=0a670f6c7767d17651ab0e5a8162dc88019bd8d5;hb=c84c6db5d56829d69083c819688a973867694a2a;hp=76620d66e5380f4f6ff10c9df14c044b89e81f19;hpb=976a13157ca8d274a5bcbdac662cac538091e92c;p=cln.git

diff --git a/src/float/lfloat/misc/cl_LF_lenincx.cc b/src/float/lfloat/misc/cl_LF_lenincx.cc
index 76620d6..0a670f6 100644
--- a/src/float/lfloat/misc/cl_LF_lenincx.cc
+++ b/src/float/lfloat/misc/cl_LF_lenincx.cc
@@ -20,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) */			\