test.tcl
puts 1
puts 2
history
puts [history event [expr [history nextid] - 1]]
in tclsh
% source test.tcl
1
2
source test.tcl
%
Why commands in tcl scripts are not added to the history?
How to automatically add commands from scripts to the history？