]> www.ginac.de Git - cln.git/blobdiff - src/integer/output/cl_I_print_string.cc
Use paths relative the `src' directory in the #include directives.
[cln.git] / src / integer / output / cl_I_print_string.cc
index 28d41ad0a97b2df60f02025aadb1df77051b0d53..8359752cea59b46dcd4199e6b24ec332782ff55a 100644 (file)
@@ -1,36 +1,38 @@
 // print_integer_to_string().
 
 // 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_I.h"
-#include "cl_DS.h"
-#include "cl_sstring.h"
+#include "integer/cl_I.h"
+#include "base/digitseq/cl_DS.h"
+#include "base/string/cl_sstring.h"
+
+namespace cln {
 
 char * print_integer_to_string (unsigned int base, const cl_I& z)
 {
-       var cl_boolean minus_p = cl_false;
+       var bool minus_p = false;
        var cl_I abs_z;
        if (minusp(z)) {
-               // z<0 -> später Vorzeichen ausgeben:
-               minus_p = cl_true;
+               // z<0 -> später Vorzeichen ausgeben:
+               minus_p = true;
                abs_z = -z;
        } else
                abs_z = z;
        CL_ALLOCA_STACK;
-       var uintL need = 1+cl_digits_need(abs_z,base);
-       var uintB* ziffern = cl_alloc_array(uintB,need); // Platz für die Ziffern
+       var uintC need = 1+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
        // Vorzeichen ankleben:
        var char* ergptr = (char*)erg.MSBptr;
-       var uintL erglen = erg.len;
+       var uintC erglen = erg.len;
        if (minus_p) {
                *--ergptr = '-';
                erglen++;
@@ -38,3 +40,5 @@ char * print_integer_to_string (unsigned int base, const cl_I& z)
        var char* result = cl_sstring(ergptr,erglen); // Ziffern in String schreiben
        return result;
 }
+
+}  // namespace cln