I no longer work with/on Tcl and/or Tk.
RLH What? This cannot be true? - RS: I hope you'll come back to us some day - if you find a better language, please tell us about it :^)
OLD
Will Dye was interested in my ~/.tclshrc so here it is:
rename unknown _unknown proc unknown {args} { global that if {[catch {expr $args} temp]} { uplevel 1 [concat _unknown $args] } else { set that $temp } } proc file.data f { set fd [open $f r] set data [read $fd] close $fd return $data } proc sum args { set n 0 foreach a $args { set n [expr {$n + $a}] } return $n }
Example usage:
% 1 + 2 + pow(2,20) 1048579.0 % sum 1 2 3 4 5 15 % file.data .xinitrc ...
Pages are rated on a scale of 1-10 based on how satisfied I am with the result.
Applications/Tools
C Extensions/Tools
Techniques
Useful Tcl Procedures
Widgets
Fluffery
old -- work in progress
T
U
W
Z