]> www.ginac.de Git - cln.git/blob - src/base/ring/cl_ring_debug.cc
Initial revision
[cln.git] / src / base / ring / cl_ring_debug.cc
1 // cl_ring debugging support.
2
3 // General includes.
4 #include "cl_sysdep.h"
5
6 // Specification.
7 #include "cl_ring.h"
8
9
10 // Implementation.
11
12 #include "cl_io.h"
13
14 void cl_ring_element::debug_print () const
15 {
16         fprint(cl_debugout, *this);
17         #ifdef CL_IO_IOSTREAM
18         cl_debugout << endl; // newline and flush output
19         #else
20         fprint(cl_debugout, "\n");
21         #endif
22 }
23
24 // This dummy links in this module when <cl_ring.h> requires it.
25 int cl_ring_debug_module;