diff options
| author | nijtmans@users.sourceforge.net <jan.nijtmans> | 2013-04-04 07:03:05 (GMT) |
|---|---|---|
| committer | nijtmans@users.sourceforge.net <jan.nijtmans> | 2013-04-04 07:03:05 (GMT) |
| commit | b134c39c7f28d2fa4cfb0e944967a6d73448159e (patch) | |
| tree | 4f5dc06707a6d44ad29d8f6e5bbd5055d9ab0f7f /generic/tclDecls.h | |
| parent | db9e954732e434ac31d15961b6406daa5e9b5799 (diff) | |
| download | tcl-b134c39c7f28d2fa4cfb0e944967a6d73448159e.zip tcl-b134c39c7f28d2fa4cfb0e944967a6d73448159e.tar.gz tcl-b134c39c7f28d2fa4cfb0e944967a6d73448159e.tar.bz2 | |
Make Tcl_EvalObj/Tcl_GlobalEvalObj a macro always, not only when using stubs.
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 20ec35d..456337a 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -6550,14 +6550,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 */ |