diff options
| author | Miguel Sofer <miguel.sofer@gmail.com> | 2015-08-01 19:00:39 (GMT) |
|---|---|---|
| committer | Miguel Sofer <miguel.sofer@gmail.com> | 2015-08-01 19:00:39 (GMT) |
| commit | 6d2f884f461d22c6f2fef2ef38f299532fc16bb4 (patch) | |
| tree | a9bf5e28d0ebad3a00a4d9877185d56e947475b3 /generic/tclOOBasic.c | |
| parent | 7239216affd24b23526c606fe0cfed2d41c7305b (diff) | |
| download | tcl-6d2f884f461d22c6f2fef2ef38f299532fc16bb4.zip tcl-6d2f884f461d22c6f2fef2ef38f299532fc16bb4.tar.gz tcl-6d2f884f461d22c6f2fef2ef38f299532fc16bb4.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.c | 6 |
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. */ |