pub type Tcl_AsyncProc = extern "C" fn(clientData: ClientData, interp: *mut Tcl_Interp, code: c_int) -> c_int;