]> www.ginac.de Git - cln.git/blobdiff - src/integer/output/cl_I_print.cc
Finalize CLN 1.3.7 release.
[cln.git] / src / integer / output / cl_I_print.cc
index 5b973c1bf3ffab0417b52b4395c78a946a85a120..ff1f1582bb9f3346c8f777ff029f11835cab9747 100644 (file)
@@ -1,19 +1,21 @@
 // print_integer().
 
 // General includes.
-#include "cl_sysdep.h"
+#include "base/cl_sysdep.h"
 
 // Specification.
-#include "cl_integer_io.h"
+#include "cln/integer_io.h"
 
 
 // Implementation.
 
-#include "cl_io.h"
-#include "cl_I.h"
-#include "cl_DS.h"
+#include "cln/io.h"
+#include "integer/cl_I.h"
+#include "base/digitseq/cl_DS.h"
 
-void print_integer (cl_ostream stream, unsigned int base, const cl_I& z)
+namespace cln {
+
+void print_integer (std::ostream& stream, unsigned int base, const cl_I& z)
 {
        var cl_I abs_z;
        if (minusp(z)) {
@@ -23,14 +25,16 @@ void print_integer (cl_ostream stream, unsigned int base, const cl_I& z)
        } else
                abs_z = z;
        CL_ALLOCA_STACK;
-       var uintL need = cl_digits_need(abs_z,base);
-       var uintB* ziffern = cl_alloc_array(uintB,need); // Platz für die Ziffern
+       var uintC need = cl_digits_need(abs_z,base);
+       var uintB* ziffern = cl_alloc_array(uintB,need); // Platz für die Ziffern
        var cl_digits erg; erg.LSBptr = &ziffern[need];
        I_to_digits(abs_z,(uintD)base,&erg); // Umwandlung in Ziffern
        // Ziffern ausgeben:
        {
                var uintB* ptr = erg.MSBptr;
-               var uintL count = erg.len;
+               var uintC count = erg.len;
                do { fprintchar(stream,*ptr++); } until (--count==0);
        }
 }
+
+}  // namespace cln