// Debugging support for dynamic typing.
// General includes.
-#include "cl_sysdep.h"
+#include "base/cl_sysdep.h"
// Specification.
-#include "cl_object.h"
+#include "cln/object.h"
// Implementation.
-#include "cl_io.h"
-#include "cl_abort.h"
+#include "cln/io.h"
+
+namespace cln {
// The default printer function.
void cl_dprint_unknown (cl_heap* pointer)
{
fprint(cl_debugout, "<unknown @0x");
- fprinthexadecimal(cl_debugout, (unsigned long) pointer);
+ fprinthexadecimal(cl_debugout, (uintptr_t) pointer);
fprint(cl_debugout, " refcount=");
fprintdecimal(cl_debugout, pointer->refcount);
fprint(cl_debugout, " type=");
- fprinthexadecimal(cl_debugout, (unsigned long) pointer->type);
+ fprinthexadecimal(cl_debugout, (uintptr_t) pointer->type);
fprint(cl_debugout, ">");
}
static void cl_dprint_unknown_immediate (cl_heap* pointer)
{
fprint(cl_debugout, "<unknown @0x");
- fprinthexadecimal(cl_debugout, (unsigned long) pointer);
+ fprinthexadecimal(cl_debugout, (uintptr_t) pointer);
fprint(cl_debugout, ">");
}
else
cl_dprint_unknown_immediate(pointer);
}
- #ifdef CL_IO_IOSTREAM
- cl_debugout << endl; // newline and flush output
- #else
- fprint(cl_debugout, "\n");
- #endif
+ cl_debugout << std::endl; // newline and flush output
return pointer;
}
{
cl_print(word);
}
+
+} // namespace cln