3 ms·

It's a little dated now but the Tcl/Tk source is very good. I'd also recommend the FreeBSD source tree.