Posted to tcl by dgp at Tue Mar 08 18:29:58 GMT 2016view pretty
% info patchlevel
8.6.5
% interp create foo
foo
% interp create bar
bar
% foo alias suicide interp delete foo
suicide
% bar alias suicide interp delete bar
suicide
% foo eval {package require Tk 8.5.19-8.5.19}
8.5.19
% bar eval {package require Tk 8.6.5-8.6.5}
8.6.5
% foo eval {pack [button .b -command suicide]}
% bar eval {pack [button .b -command suicide]}
% foo eval {pack [label .l -text [package present Tk]]}
% bar eval {pack [label .l -text [package present Tk]]}