Artifact
a3df4fac7b36f58753878e5e489c839f661896eb:
Attachment "1422736.patch" to
ticket [1422736fff]
added by
dgp
2006-02-09 05:17:59.
Index: tests/main.test
===================================================================
RCS file: /cvsroot/tcl/tcl/tests/main.test,v
retrieving revision 1.16
diff -u -r1.16 main.test
--- tests/main.test 28 Apr 2005 05:32:02 -0000 1.16
+++ tests/main.test 8 Feb 2006 22:16:33 -0000
@@ -913,6 +913,7 @@
} -body {
exec [interpreter] << {
proc foo\{ x {}
+ set ::auto_noexec xxx
set tcl_interactive 1
foo y} >& result
set f [open result]