diff options
| author | jan.nijtmans <jan.nijtmans@noemail.net> | 2013-04-09 10:10:34 (GMT) |
|---|---|---|
| committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2013-04-09 10:10:34 (GMT) |
| commit | 12dc6516f21c9917f1b31444441605ca7deb9b5a (patch) | |
| tree | 380dd687f9dc15c475a6e55a784e88b0c59b6308 /generic/tclDecls.h | |
| parent | fbbd6676861a3ec519c1d1fef47c78af92f6d843 (diff) | |
| download | tcl-12dc6516f21c9917f1b31444441605ca7deb9b5a.zip tcl-12dc6516f21c9917f1b31444441605ca7deb9b5a.tar.gz tcl-12dc6516f21c9917f1b31444441605ca7deb9b5a.tar.bz2 | |
Make (deprecated) Tcl_EvalObj/Tcl_GlobalEvalObj macro's always, not only when using stubs.
FossilOrigin-Name: 58c923ed9ef4777083965929da1aa2fbe2aff324
Diffstat (limited to 'generic/tclDecls.h')
| -rw-r--r-- | generic/tclDecls.h | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h index 8d9f635..618536d 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -4519,14 +4519,12 @@ extern TclStubs *tclStubsPtr; /* * Deprecated Tcl procedures: */ -#if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) -# undef Tcl_EvalObj -# define Tcl_EvalObj(interp,objPtr) \ - Tcl_EvalObjEx((interp),(objPtr),0) -# undef Tcl_GlobalEvalObj -# define Tcl_GlobalEvalObj(interp,objPtr) \ - Tcl_EvalObjEx((interp),(objPtr),TCL_EVAL_GLOBAL) -#endif +#undef Tcl_EvalObj +#define Tcl_EvalObj(interp,objPtr) \ + Tcl_EvalObjEx((interp),(objPtr),0) +#undef Tcl_GlobalEvalObj +#define Tcl_GlobalEvalObj(interp,objPtr) \ + Tcl_EvalObjEx((interp),(objPtr),TCL_EVAL_GLOBAL) #endif /* _TCLDECLS */ |