diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-13 10:19:38 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-04-13 10:19:38 (GMT) |
| commit | a02901a8b46ce085a0f8871bbd11cf14f68e024a (patch) | |
| tree | 8bbe8497616271dc368d1cb9c319bc7e6c28c10f /generic | |
| parent | 9d12dd535ad7861c03c333289a501003f4ffed1b (diff) | |
| parent | 4ef5cbaad759b55d3e892b3dcbfb69f7809a4cea (diff) | |
| download | tcl-a02901a8b46ce085a0f8871bbd11cf14f68e024a.zip tcl-a02901a8b46ce085a0f8871bbd11cf14f68e024a.tar.gz tcl-a02901a8b46ce085a0f8871bbd11cf14f68e024a.tar.bz2 | |
Merge tip-597
Diffstat (limited to 'generic')
| -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 |