]> www.ginac.de Git - cln.git/blobdiff - src/base/string/output/cl_st_print.cc
Finalize CLN 1.3.7 release.
[cln.git] / src / base / string / output / cl_st_print.cc
index 8bbbf66446a60371851acde79c930698778a510f..7ccc881b44a3fe8d25a400fae8361f014b9026da 100644 (file)
@@ -1,27 +1,21 @@
 // fprint().
 
 // General includes.
-#include "cl_sysdep.h"
+#include "base/cl_sysdep.h"
 
 // Specification.
-#include "cl_string.h"
+#include "cln/string.h"
 
 
 // Implementation.
 
-#include "cl_io.h"
+#include "cln/io.h"
 
-void fprint (cl_ostream stream, const cl_string& str)
+namespace cln {
+
+void fprint (std::ostream& stream, const cl_string& str)
 {
-#if defined(CL_IO_STDIO)
-       var const char * ptr = str.asciz();
-       var unsigned long i = str.length();
-       while (i > 0) {
-               fprintchar(stream,*ptr);
-               ptr++; i--;
-       }
-#endif
-#if defined(CL_IO_IOSTREAM)
-       stream.write(str.asciz(),str.length());
-#endif
+       stream.write(str.asciz(),str.size());
 }
+
+}  // namespace cln