Extend the exponent range from 32 bits to 64 bits on selected platforms.

[cln.git] / src / float / lfloat / elem / cl_LF_I_div.cc

diff --git a/src/float/lfloat/elem/cl_LF_I_div.cc b/src/float/lfloat/elem/cl_LF_I_div.cc
index 188f089e8783a0ffdaec8cf2d9f02f721f5f88a9..139f3e1e153704a1c56b12ba6cf421722046c660 100644 (file)
--- a/src/float/lfloat/elem/cl_LF_I_div.cc
+++ b/src/float/lfloat/elem/cl_LF_I_div.cc
@@ -84,8 +84,8 @@ const cl_LF cl_LF_I_div (const cl_LF& x, const cl_I& y)
        }
        // Quotient MSDptr/len/.. ist nun normalisiert: höchstes Bit =1.
        // exponent := exponent(x) - intDsize*y_len + shiftcount
-       var uintL uexp = TheLfloat(x)->expo;
-       var uintL dexp = intDsize*y_len - shiftcount; // >= 0 !
+       var uintE uexp = TheLfloat(x)->expo;
+       var uintE dexp = intDsize*y_len - shiftcount; // >= 0 !
        if ((uexp < dexp) || ((uexp = uexp - dexp) < LF_exp_low)) {
                if (underflow_allowed())
                        { cl_error_floating_point_underflow(); }