pub type Tcl_EventDeleteProc = extern "C" fn(evPtr: *mut Tcl_Event, clientData: ClientData) -> c_int;