summaryrefslogtreecommitdiffstats
path: root/generic/tclCompile.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2010-10-13 17:10:57 (GMT)
committerdgp <dgp@users.sourceforge.net>2010-10-13 17:10:57 (GMT)
commit0d28a913fcbe639c039cdbfc69d2cc0c0f802810 (patch)
treed073c3a4f9eb1481d292967d9c1807337e5b03bf /generic/tclCompile.c
parent40fe734e338c7f76d3d8e58dc9ba49618ed78922 (diff)
downloadtcl-0d28a913fcbe639c039cdbfc69d2cc0c0f802810.zip
tcl-0d28a913fcbe639c039cdbfc69d2cc0c0f802810.tar.gz
tcl-0d28a913fcbe639c039cdbfc69d2cc0c0f802810.tar.bz2
remove outdated comment
Diffstat (limited to 'generic/tclCompile.c')
-rw-r--r--generic/tclCompile.c8
1 files changed, 1 insertions, 7 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c
index 5547071..dd92f27 100644
--- a/generic/tclCompile.c
+++ b/generic/tclCompile.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclCompile.c,v 1.190 2010/10/13 16:41:27 dgp Exp $
+ * RCS: @(#) $Id: tclCompile.c,v 1.191 2010/10/13 17:10:57 dgp Exp $
*/
#include "tclInt.h"
@@ -1854,12 +1854,6 @@ TclCompileScript(
/*
* If the source script yielded no instructions (e.g., if it was empty),
* push an empty string as the command's result.
- *
- * WARNING: push an unshared object! If the script being compiled is a
- * shared empty string, it will otherwise be self-referential and cause
- * difficulties with literal management [Bugs 467523, 983660]. We used to
- * have special code in TclReleaseLiteral to handle this particular
- * self-reference, but now opt for avoiding its creation altogether.
*/
if (envPtr->codeNext == entryCodeNext) {