X-Git-Url: https://ginac.de/CLN/cln.git//cln.git?a=blobdiff_plain;f=src%2Ffloat%2Flfloat%2Fmisc%2Fcl_LF_idecode.cc;h=8d547d345e50fa4ed4301621620ff033605dd42e;hb=665c18cd376d8d8c5a8eafb30681a3f9f46d4a99;hp=06c8d0948241e5ad0dec62857882f4be2bcd0738;hpb=850abfde7f0d985ba01526c346bcd0d733562943;p=cln.git

diff --git a/src/float/lfloat/misc/cl_LF_idecode.cc b/src/float/lfloat/misc/cl_LF_idecode.cc
index 06c8d09..8d547d3 100644
--- a/src/float/lfloat/misc/cl_LF_idecode.cc
+++ b/src/float/lfloat/misc/cl_LF_idecode.cc
@@ -19,13 +19,13 @@ MAYBE_INLINE
 const cl_idecoded_float integer_decode_float (const cl_LF& x)
 {
 	// x entpacken:
-	var uintL uexp = TheLfloat(x)->expo;
+	var uintE uexp = TheLfloat(x)->expo;
 	if (uexp == 0)
 		{ return cl_idecoded_float(0, 0, 1); }
 	var cl_signean sign = TheLfloat(x)->sign;
 	var uintC len = TheLfloat(x)->len;
 	// intDsize*len >= 53 >= 33 >= cl_value_len, also len >= bn_minlength.
-	// Baue Integer für die Mantisse.
+	// Baue Integer für die Mantisse.
 	// Vorne 1 Nulldigit, damit es eine NDS wird.
 	var Bignum mant = allocate_bignum(1+len);
 	mspref(arrayMSDptr(TheBignum(mant)->data,1+len),0) = 0;
@@ -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
 	       );
 }