Tcl Source Code

Artifact [5df0e54b32]
Login

Artifact 5df0e54b3277724dc15a12eb5bd8f82dca73f2a4:

Attachment "tcl.bug" to ticket [582810ffff] added by nobody 2002-07-17 20:00:08.
*** tclThread.c	Tue Apr  4 20:42:20 2000

*** 214 ****
! 	recPtr->max += 8;
--- 214,219 ----
!         j = 0;    
!         for(i = 0; i < recPtr->num; i++){
!             if(recPtr->list[i] == NULL) j++;
!             if(j >= 8) break;
!         }
!         if(j < 8) recPtr->max += 8;