diff options
author | dgp <dgp@noemail.net> | 2011-03-03 21:28:43 (GMT) |
---|---|---|
committer | dgp <dgp@noemail.net> | 2011-03-03 21:28:43 (GMT) |
commit | 1ff7e32e704494f7fa9892950fa13e081c8ead1c (patch) | |
tree | a9a47dabac924e5befe7cc8444955eb0860ec6b6 /generic/tclResult.c | |
parent | c837edbb43e9a71cdad9a71c0c66f9582f619422 (diff) | |
download | tcl-1ff7e32e704494f7fa9892950fa13e081c8ead1c.zip tcl-1ff7e32e704494f7fa9892950fa13e081c8ead1c.tar.gz tcl-1ff7e32e704494f7fa9892950fa13e081c8ead1c.tar.bz2 |
USE_DIRECT_INTERP_RESULT_ACCESS -> USE_INTERP_RESULT [TIP 330].
FossilOrigin-Name: d8df544b20891b9a242246f651cec3104c21939f
Diffstat (limited to 'generic/tclResult.c')
-rw-r--r-- | generic/tclResult.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclResult.c b/generic/tclResult.c index 99942a9..f60ae26 100644 --- a/generic/tclResult.c +++ b/generic/tclResult.c @@ -648,14 +648,14 @@ Tcl_AppendResultVA( * calls to Tcl_GetStringResult() itself. [Patch 1041072 discussion] */ -#ifdef USE_DIRECT_INTERP_RESULT_ACCESS +#ifdef USE_INTERP_RESULT /* * Ensure that the interp->result is legal so old Tcl 7.* code still * works. There's still embarrasingly much of it about... */ (void) Tcl_GetStringResult(interp); -#endif /* USE_DIRECT_INTERP_RESULT_ACCESS */ +#endif /* USE_INTERP_RESULT */ } /* |