diff options
author | dgp <dgp@noemail.net> | 2010-02-17 15:40:54 (GMT) |
---|---|---|
committer | dgp <dgp@noemail.net> | 2010-02-17 15:40:54 (GMT) |
commit | dd7f695d827035aa40d975292194e6b1566d773f (patch) | |
tree | eb7fc740f58f8b98c1c1c00ed7c892d9c4fee13b /generic/tclLiteral.c | |
parent | be625eca96170d2ee432a67300182398edba4c74 (diff) | |
download | tcl-dd7f695d827035aa40d975292194e6b1566d773f.zip tcl-dd7f695d827035aa40d975292194e6b1566d773f.tar.gz tcl-dd7f695d827035aa40d975292194e6b1566d773f.tar.bz2 |
missing comma
FossilOrigin-Name: d8c2f8b54cc05a3d081ef7d5f8a6fbe6eec5619e
Diffstat (limited to 'generic/tclLiteral.c')
-rw-r--r-- | generic/tclLiteral.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclLiteral.c b/generic/tclLiteral.c index cda9caf..05e1dba 100644 --- a/generic/tclLiteral.c +++ b/generic/tclLiteral.c @@ -13,7 +13,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclLiteral.c,v 1.38 2010/02/16 14:09:07 dkf Exp $ + * RCS: @(#) $Id: tclLiteral.c,v 1.39 2010/02/17 15:40:54 dgp Exp $ */ #include "tclInt.h" @@ -315,7 +315,7 @@ TclCreateLiteral( #ifdef TCL_COMPILE_DEBUG if (TclLookupLiteralEntry((Tcl_Interp *) iPtr, objPtr) != NULL) { Tcl_Panic("%s: literal \"%.*s\" found globally but shouldn't be", - "TclRegisterLiteral" (length>60? 60 : length), bytes); + "TclRegisterLiteral", (length>60? 60 : length), bytes); } #endif |