diff options
author | dgp <dgp@noemail.net> | 2008-10-02 20:59:45 (GMT) |
---|---|---|
committer | dgp <dgp@noemail.net> | 2008-10-02 20:59:45 (GMT) |
commit | dd4847917bc3fae5d6c45cb44d4bd2e954963860 (patch) | |
tree | 8a07cbfafbc8c5b8fea073e97921199f1cd90377 /generic/tclStubLib.c | |
parent | d2060575179db33631e2ee7a16806451520d7231 (diff) | |
download | tcl-dd4847917bc3fae5d6c45cb44d4bd2e954963860.zip tcl-dd4847917bc3fae5d6c45cb44d4bd2e954963860.tar.gz tcl-dd4847917bc3fae5d6c45cb44d4bd2e954963860.tar.bz2 |
TIP #330 IMPLEMENTATION
* generic/tcl.h: Remove the "result" and "freeProc" fields
* generic/tclBasic.c: from the default public declaration of the
* generic/tclResult.c: Tcl_Interp struct. Code should no longer
* generic/tclStubLib.c: be accessing these fields. Access can be
* generic/tclTest.c: restored by defining USE_INTERP_RESULT, but
* generic/tclUtil.c: that should only be a temporary migration aid.
*** POTENTIAL INCOMPATIBILITY ***
FossilOrigin-Name: df44cd3e1642fa9ed3671e02f5139276fb48a097
Diffstat (limited to 'generic/tclStubLib.c')
-rw-r--r-- | generic/tclStubLib.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclStubLib.c b/generic/tclStubLib.c index 168676f..9b8f390 100644 --- a/generic/tclStubLib.c +++ b/generic/tclStubLib.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclStubLib.c,v 1.26 2008/04/27 22:21:32 dkf Exp $ + * RCS: @(#) $Id: tclStubLib.c,v 1.27 2008/10/02 20:59:45 dgp Exp $ */ /* @@ -46,9 +46,9 @@ HasStubSupport( return iPtr->stubTable; } - interp->result = + iPtr->result = "This interpreter does not support stubs-enabled extensions."; - interp->freeProc = TCL_STATIC; + iPtr->freeProc = TCL_STATIC; return NULL; } |