How to debug tcl script files?

I think the premise behind the scripts is that they just work, and you're not supposed to debug them. That being said, I've done it myself the old fashioned way, adding puts statements to get the info I need. I'd prefer if they had a debug variable that dumped a lot more info, and I think, emphasis on think, the scripts are being improved to be more readable.