diff options
author | nijtmans <nijtmans@noemail.net> | 2010-02-05 20:53:12 (GMT) |
---|---|---|
committer | nijtmans <nijtmans@noemail.net> | 2010-02-05 20:53:12 (GMT) |
commit | 16100fde77c689bb94455ebf7026708590140758 (patch) | |
tree | a7fd50364b89ff5d71caa2334171f35231b0dd1c /generic/tclTest.c | |
parent | 191c0c3cac3b51da331715f95d8781c87810900e (diff) | |
download | tcl-16100fde77c689bb94455ebf7026708590140758.zip tcl-16100fde77c689bb94455ebf7026708590140758.tar.gz tcl-16100fde77c689bb94455ebf7026708590140758.tar.bz2 |
Follow-up to earlier commit today:
Eliminate the need for an extra Stubs Pointer
for adressing a static stub table: Just change
the exported table from static to MODULE_SCOPE.
FossilOrigin-Name: b809fb2cbc1d415f61219d9c1b019d552efde765
Diffstat (limited to 'generic/tclTest.c')
-rw-r--r-- | generic/tclTest.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 192e7e2..793dccc 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -14,7 +14,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclTest.c,v 1.143 2009/12/16 23:26:01 nijtmans Exp $ + * RCS: @(#) $Id: tclTest.c,v 1.144 2010/02/05 20:53:12 nijtmans Exp $ */ #undef STATIC_BUILD @@ -2227,7 +2227,7 @@ ExitProcOdd( sprintf(buf, "odd %d\n", PTR2INT(clientData)); len = strlen(buf); if (len != (size_t) write(1, buf, len)) { - Tcl_Panic("ExitProcOdd: unable to write to stdout"); + Tcl_Panic("ExitProcOdd: unable to write to stdout"); } } @@ -2241,7 +2241,7 @@ ExitProcEven( sprintf(buf, "even %d\n", PTR2INT(clientData)); len = strlen(buf); if (len != (size_t) write(1, buf, len)) { - Tcl_Panic("ExitProcEven: unable to write to stdout"); + Tcl_Panic("ExitProcEven: unable to write to stdout"); } } |