set_eventloop_weight 1372 ext/tk/tcltklib.c     return set_eventloop_weight(self, loop_max, no_event);
set_eventloop_weight 10000 ext/tk/tcltklib.c                               set_eventloop_weight, 2);