diff options
author | jan.nijtmans <jan.nijtmans@noemail.net> | 2013-04-04 07:07:28 (GMT) |
---|---|---|
committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2013-04-04 07:07:28 (GMT) |
commit | 9f7a797e934f9cfa85bdf8312c513b332d3c6e09 (patch) | |
tree | 246f77dbef6234338add5e62443a52074c10480c /generic/tclDecls.h | |
parent | dc1738c4603bd2d2880d7785153efc6121331a78 (diff) | |
parent | 410412e3780d54eeea7376afd3b203e801a626d0 (diff) | |
download | tcl-9f7a797e934f9cfa85bdf8312c513b332d3c6e09.zip tcl-9f7a797e934f9cfa85bdf8312c513b332d3c6e09.tar.gz tcl-9f7a797e934f9cfa85bdf8312c513b332d3c6e09.tar.bz2 |
Make Tcl_EvalObj/Tcl_GlobalEvalObj a macro always, not only when using stubs.
FossilOrigin-Name: 45d8edf1bbd22a5908661e7fc0a4b03d10704ab2
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 04a735a..a1c0bf4 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -3812,13 +3812,11 @@ extern const 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 */ |