diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-13 08:05:45 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-13 08:05:45 (GMT) |
commit | 9f61e10cf9b266d5f71d7308a13494a402a9ae69 (patch) | |
tree | ef933ea3bbf022f3a690890f470f84b5fd63b5f5 | |
parent | a3968430065fe4b5aae4a5fb402502d1bcf416c3 (diff) | |
download | tcl-9f61e10cf9b266d5f71d7308a13494a402a9ae69.zip tcl-9f61e10cf9b266d5f71d7308a13494a402a9ae69.tar.gz tcl-9f61e10cf9b266d5f71d7308a13494a402a9ae69.tar.bz2 |
Unbreak build
-rw-r--r-- | generic/tclResult.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclResult.c b/generic/tclResult.c index 086659e..5b7a8e5 100644 --- a/generic/tclResult.c +++ b/generic/tclResult.c @@ -488,7 +488,7 @@ const char * Tcl_GetStringResult( Tcl_Interp *interp)/* Interpreter whose result to return. */ { -#ifdef TCL_NO_DEPRECATED +#ifndef TCL_NO_DEPRECATED Interp *iPtr = (Interp *) interp; /* * If the string result is empty, move the object result to the string |