diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-16 12:50:46 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-16 12:50:46 (GMT) |
| commit | aee29839da30f7b46c73f3f2cb41ce97b7f7b16f (patch) | |
| tree | 4138d26039f64d5fff7fd80bb03c6041ac8c10c5 | |
| parent | 079f15d9e398e28651c0185842c5e9842272d6b9 (diff) | |
| download | tk-aee29839da30f7b46c73f3f2cb41ce97b7f7b16f.zip tk-aee29839da30f7b46c73f3f2cb41ce97b7f7b16f.tar.gz tk-aee29839da30f7b46c73f3f2cb41ce97b7f7b16f.tar.bz2 | |
Remove TkOldTestInit
| -rw-r--r-- | generic/tkInt.h | 1 | ||||
| -rw-r--r-- | generic/tkTest.c | 8 |
2 files changed, 0 insertions, 9 deletions
diff --git a/generic/tkInt.h b/generic/tkInt.h index 9f5a31b..dc44576 100644 --- a/generic/tkInt.h +++ b/generic/tkInt.h @@ -1469,7 +1469,6 @@ MODULE_SCOPE int TkUnsupported1ObjCmd(void *clientData, MODULE_SCOPE int SquareObjCmd(void *clientData, Tcl_Interp *interp, int objc, Tcl_Obj * const objv[]); -MODULE_SCOPE int TkOldTestInit(Tcl_Interp *interp); #if !(defined(_WIN32) || defined(MAC_OSX_TK)) #define TkplatformtestInit(x) TCL_OK #else diff --git a/generic/tkTest.c b/generic/tkTest.c index dd3764e..e776bbf 100644 --- a/generic/tkTest.c +++ b/generic/tkTest.c @@ -305,14 +305,6 @@ Tktest_Init( } /* - * Enable testing of legacy interfaces. - */ - - if (TkOldTestInit(interp) != TCL_OK) { - return TCL_ERROR; - } - - /* * And finally add any platform specific test commands. */ |