diff options
| author | stanton <stanton> | 1999-02-10 23:31:10 (GMT) |
|---|---|---|
| committer | stanton <stanton> | 1999-02-10 23:31:10 (GMT) |
| commit | bcc73119d3301482376ec5d7876b49b28e615e75 (patch) | |
| tree | d13f4f917b1cc9bcb348bfb160c43812ede3fcc1 /generic/tclParse.c | |
| parent | 346e62b0d3e9ae361bfab66add2936891f6f299e (diff) | |
| download | tcl-bcc73119d3301482376ec5d7876b49b28e615e75.zip tcl-bcc73119d3301482376ec5d7876b49b28e615e75.tar.gz tcl-bcc73119d3301482376ec5d7876b49b28e615e75.tar.bz2 | |
* unix/mkLinks:
* doc/SetVar.3:
* generic/tcl.h:
* generic/tclVar.c: Restored Tcl_ObjGetVar2 and Tcl_ObjSetVar2
from 8.0. Renamed Tcl_Get/SetObjVar2 to Tcl_GetVar2Ex and
Tcl_SetVar2Ex.
* Merged 8.0.5b2 patches
Diffstat (limited to 'generic/tclParse.c')
| -rw-r--r-- | generic/tclParse.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclParse.c b/generic/tclParse.c index 823e5f9..ec35cdf 100644 --- a/generic/tclParse.c +++ b/generic/tclParse.c @@ -14,7 +14,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclParse.c,v 1.1.2.8 1999/02/01 21:29:54 stanton Exp $ + * RCS: @(#) $Id: tclParse.c,v 1.1.2.9 1999/02/10 23:31:18 stanton Exp $ */ #include "tclInt.h" @@ -1213,7 +1213,7 @@ Tcl_EvalTokens(interp, tokenPtr, count) } else { index = NULL; } - valuePtr = Tcl_GetObjVar2(interp, varName, index, + valuePtr = Tcl_GetVar2Ex(interp, varName, index, TCL_LEAVE_ERR_MSG); if (varName != nameBuffer) { ckfree(varName); |