1 // cl_SF debugging support.
11 #include "cln/sfloat.h"
13 #include "cln/float_io.h"
17 static void dprint (cl_heap* pointer)
19 var const cl_SF& obj = *(const cl_SF*)&pointer;
20 fprint(cl_debugout, "(cl_SF) ");
21 fprint(cl_debugout, obj);
23 AT_INITIALIZATION(dprint_SF)
24 { cl_register_type_printer(cl_class_sfloat,dprint); }
26 // This dummy links in this module when <cln/sfloat.h> requires it.
27 int cl_SF_debug_module;