]> www.ginac.de Git - cln.git/blobdiff - src/integer/bitwise/cl_I_ash.cc
* */*: Remove cl_boolean, cl_true, and cl_false in favor of built-in
[cln.git] / src / integer / bitwise / cl_I_ash.cc
index 19c9f1cdcae20c2aa3d7db68c860d2baad39bb8c..345de1c76c0e414a73b450acaab0d19ed9742c3d 100644 (file)
@@ -39,7 +39,7 @@ const cl_I ash (const cl_I& x, sintC y)
                var uintD* LSDptr;
                var uintC len;
                var const uintD* x_LSDptr;
-               I_to_NDS_nocopy(x, ,len=,x_LSDptr=,cl_false,); // DS zu x bilden.
+               I_to_NDS_nocopy(x, ,len=,x_LSDptr=,false,); // DS zu x bilden.
                if (k >= (uintC)(~len)) // kann len+k+1 Überlauf geben?
                        { throw ash_exception(y); } // ja -> Fehler
                num_stack_alloc_1(len+k,,LSDptr=);