scm_c_define_gsubr("dc-disconnect", 0, 0, 0, scm_dc_disconnect);
scm_c_define_gsubr("dc-connected", 0, 0, 0, scm_dc_connected);
scm_c_define_gsubr("dc-select", 0, 1, 0, scm_dc_select);
scm_c_define_gsubr("dc-disconnect", 0, 0, 0, scm_dc_disconnect);
scm_c_define_gsubr("dc-connected", 0, 0, 0, scm_dc_connected);
scm_c_define_gsubr("dc-select", 0, 1, 0, scm_dc_select);