]> www.ginac.de Git - cln.git/blobdiff - src/float/lfloat/algebraic/cl_LF_sqrt.cc
2006-04-25 Bruno Haible <bruno@clisp.org>
[cln.git] / src / float / lfloat / algebraic / cl_LF_sqrt.cc
index 613e4fb69eb92efda5a5fbf21ff511e9333df0e3..87d974c5026391845cd9d5d9625f23b5866daced 100644 (file)
@@ -42,7 +42,7 @@ const cl_LF sqrt (const cl_LF& x)
       CL_ALLOCA_STACK;
       var uintD* r_MSDptr;
       var uintD* r_LSDptr;
-      var uintL r_len = 2*(uintL)len+2; // L�ge des Radikanden
+      var uintC r_len = 2*len+2; // Länge des Radikanden
       num_stack_alloc(r_len, r_MSDptr=,r_LSDptr=);
       if ((uexp & bit(0)) == (LF_exp_mid & bit(0)))
         // Exponent gerade