]> www.ginac.de Git - cln.git/blobdiff - src/float/lfloat/misc/cl_LF_idecode.cc
2006-04-25 Bruno Haible <bruno@clisp.org>
[cln.git] / src / float / lfloat / misc / cl_LF_idecode.cc
index 06c8d0948241e5ad0dec62857882f4be2bcd0738..b21490c3b0cdebca140fa3b6b3fc589c39497f04 100644 (file)
@@ -34,7 +34,7 @@ const cl_idecoded_float integer_decode_float (const cl_LF& x)
                // Mantisse
                mant,
                // e-intDsize*n = uexp-LF_exp_mid-intDsize*n als Integer
-               minus(uexp, LF_exp_mid + intDsize*(uintL)len),
+               minus(uexp, LF_exp_mid + intDsize*len),
                (sign>=0 ? cl_I(1) : cl_I(-1)) // (-1)^s erzeugen
               );
 }