diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-12-01 11:03:43 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-12-01 11:03:43 (GMT) |
| commit | e802927981b7af35c948a4c887be2a5399151d95 (patch) | |
| tree | a1d884ee8678f22073a6b90a5e6d26e9b79edf25 /generic/tclBasic.c | |
| parent | 9d4d161834c56aad6788b74797f34662f2e7947d (diff) | |
| parent | 1a237e67df1f72fce66636d7efcd7cffa82bd0b8 (diff) | |
| download | tcl-e802927981b7af35c948a4c887be2a5399151d95.zip tcl-e802927981b7af35c948a4c887be2a5399151d95.tar.gz tcl-e802927981b7af35c948a4c887be2a5399151d95.tar.bz2 | |
Remove stub entries for Tcl_EvalObj()/Tcl_GlobalEvalObj(). Since those functions are actually macro's translating to Tcl_EvalObjEx(), those stub entries don't serve any purpose any more.
Diffstat (limited to 'generic/tclBasic.c')
| -rw-r--r-- | generic/tclBasic.c | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index 972c09d..67e5490 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -5893,40 +5893,6 @@ Tcl_Eval( { return Tcl_EvalEx(interp, script, -1, 0); } - -/* - *---------------------------------------------------------------------- - * - * Tcl_EvalObj, Tcl_GlobalEvalObj -- - * - * These functions are deprecated but we keep them around for backwards - * compatibility reasons. - * - * Results: - * See the functions they call. - * - * Side effects: - * See the functions they call. - * - *---------------------------------------------------------------------- - */ - -#undef Tcl_EvalObj -int -Tcl_EvalObj( - Tcl_Interp *interp, - Tcl_Obj *objPtr) -{ - return Tcl_EvalObjEx(interp, objPtr, 0); -} -#undef Tcl_GlobalEvalObj -int -Tcl_GlobalEvalObj( - Tcl_Interp *interp, - Tcl_Obj *objPtr) -{ - return Tcl_EvalObjEx(interp, objPtr, TCL_EVAL_GLOBAL); -} #endif /* TCL_NO_DEPRECATED */ /* |