Call threaddata() only once before each loop

[michaelortmann]

Found by: michaelortmann
Patch by: michaelortmann
Fixes:

One-line summary:
Call threaddata() only once before each loop

Additional description (if needed):
found with ltrace

Test cases demonstrating functionality (if applicable):
ltrace ./eggdrop -t BotA.conf
Before:

[...]
time(0)                                                                        = 1701312730
Tcl_GetThreadData(0x56237a204b88, 40, 15, 0)                                   = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 0, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 1, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 2, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 3, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 4, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 5, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 6, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 7, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 8, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 9, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 10, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 11, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 12, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 13, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 14, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 15, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 16, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 17, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 18, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 19, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 0x7fff6a24d5ac, 0x56237b51d480)          = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 0, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 1, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 2, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 3, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 4, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 5, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 6, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 7, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 8, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 9, 0x56237b5f47b0)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 10, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 11, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 12, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 13, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 14, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 15, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 16, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 17, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 18, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 19, 0x56237b5f47b0)                      = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 3, 0x56237b51d480)                       = 0x56237b51d480
Tcl_GetThreadData(0x56237a204b88, 40, 0x56237b5f47b0, 20)                      = 0x56237b51d480
select[...]

After:

[...]
time(0)                                                                        = 1701312776
Tcl_GetThreadData(0x556d578bfb88, 40, 0x556d578b8be0, 0)                       = 0x556d582dc480
Tcl_GetThreadData(0x556d578bfb88, 40, 0x7fffa675be8c, 0x556d583b37b0)          = 0x556d582dc480
Tcl_GetThreadData(0x556d578bfb88, 40, 0x556d583b37b0, 20)                      = 0x556d582dc480
select[...]