     .t mark set foo 0.0     set x [.t index {0.0 + 0 chars}]     .t mark unset foo     set x } 0.00 test textIndex-00.0 {TkTextIndexForwChars: find index} {     # for ( ; segPtr != NULL; segPtr = segPtr->nextPtr)     # border condition: 