diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-03-28 14:48:08 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-03-28 14:48:08 (GMT) |
commit | 4e1c42706e2192221efb4179bcae10e4bd042303 (patch) | |
tree | 7c272a230676ca031b178bdef453b946f968ee92 /generic/tclStubInit.c | |
parent | 0a1209b8b919a0913b8ef905bd8244dfaf8d56ea (diff) | |
download | tcl-4e1c42706e2192221efb4179bcae10e4bd042303.zip tcl-4e1c42706e2192221efb4179bcae10e4bd042303.tar.gz tcl-4e1c42706e2192221efb4179bcae10e4bd042303.tar.bz2 |
Undo [6a9ee3273c]. Last commit in Tk's core-8-5-branch makes this change no longer necessary.
Diffstat (limited to 'generic/tclStubInit.c')
-rw-r--r-- | generic/tclStubInit.c | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index f8012c2..fd4a222 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -76,13 +76,6 @@ MODULE_SCOPE TclPlatStubs tclPlatStubs; MODULE_SCOPE TclStubs tclStubs; MODULE_SCOPE TclTomMathStubs tclTomMathStubs; -#define TclCanceled canceled -static int TclCanceled(interp) - Tcl_Interp *interp; -{ - return TCL_OK; -} - #if defined(_WIN32) || defined(__CYGWIN__) #undef TclWinNToHS unsigned short TclWinNToHS(unsigned short ns) { @@ -1263,7 +1256,7 @@ TclStubs tclStubs = { Tcl_ObjPrintf, /* 578 */ Tcl_AppendPrintfToObj, /* 579 */ NULL, /* 580 */ - TclCanceled, /* 581 */ + NULL, /* 581 */ NULL, /* 582 */ NULL, /* 583 */ NULL, /* 584 */ |