summaryrefslogtreecommitdiffstats
path: root/generic/tclOOBasic.c
diff options
context:
space:
mode:
authorMiguel Sofer <miguel.sofer@gmail.com>2015-08-01 19:00:39 (GMT)
committerMiguel Sofer <miguel.sofer@gmail.com>2015-08-01 19:00:39 (GMT)
commit33a7feeefdbe3e76e6e2b4757933356f3b0660ca (patch)
treea9bf5e28d0ebad3a00a4d9877185d56e947475b3 /generic/tclOOBasic.c
parentf795c9e1311790997cc6d659ebfff0c54d0a0a92 (diff)
downloadtcl-33a7feeefdbe3e76e6e2b4757933356f3b0660ca.zip
tcl-33a7feeefdbe3e76e6e2b4757933356f3b0660ca.tar.gz
tcl-33a7feeefdbe3e76e6e2b4757933356f3b0660ca.tar.bz2
explicitly ignore Tcl_PushCallFrame and TclPushStackFrame return value - it is always TCL_OK. Inconsistency found by coverity (CID 1251197)
Diffstat (limited to 'generic/tclOOBasic.c')
-rw-r--r--generic/tclOOBasic.c6
1 files changed, 1 insertions, 5 deletions
diff --git a/generic/tclOOBasic.c b/generic/tclOOBasic.c
index 0b0516b..8cb80e5 100644
--- a/generic/tclOOBasic.c
+++ b/generic/tclOOBasic.c
@@ -402,7 +402,6 @@ TclOO_Object_Eval(
register const int skip = Tcl_ObjectContextSkippedArgs(context);
CallFrame *framePtr, **framePtrPtr = &framePtr;
Tcl_Obj *scriptPtr;
- int result;
CmdFrame *invoker;
if (objc-1 < skip) {
@@ -415,11 +414,8 @@ TclOO_Object_Eval(
* command(s).
*/
- result = TclPushStackFrame(interp, (Tcl_CallFrame **) framePtrPtr,
+ (void) TclPushStackFrame(interp, (Tcl_CallFrame **) framePtrPtr,
Tcl_GetObjectNamespace(object), 0);
- if (result != TCL_OK) {
- return TCL_ERROR;
- }
framePtr->objc = objc;
framePtr->objv = objv; /* Reference counts do not need to be
* incremented here. */