@verb #8765:"get_free_entry" this none this rxdo #9216
@program #8765:"get_free_entry" this none this
":get_free_entry() => new client id number."
this:remove_dead_clients()
if ((l = length(this.irc_clients)) < this.irc_clients_limit)
  this.irc_clients = {@this.irc_clients, {}}
  return l + 1
endif
for i in [1..this.irc_clients_limit]
  if (this.irc_clients[i] = {})
    return i
  endif
endfor
return 0
"Last modified by Slacker (#55) on Fri Aug 23 15:05:14 2002 MDT."
.