void EventHandler::display() { dprintf( D_ALWAYS, "EventHandler {\n" ); dprintf( D_ALWAYS, "\tfunc = %p\n", func ); display_sigset( "\tmask = ", &mask ); dprintf( D_ALWAYS, "}\n" ); }
void sigset_print(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) { Scm_Printf(out, "#<sys-sigset ["); display_sigset(&SCM_SYS_SIGSET(obj)->set, out); Scm_Printf(out, "]>"); }