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/tclTest.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/tclTest.c')
| -rw-r--r-- | generic/tclTest.c | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 19a9033..650e363 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -4671,7 +4671,6 @@ TestgetvarfullnameCmd( Tcl_Namespace *namespacePtr; Tcl_CallFrame *framePtr; Tcl_Var variable; - int result; if (objc != 3) { Tcl_WrongNumArgs(interp, 1, objv, "name scope"); @@ -4699,11 +4698,8 @@ TestgetvarfullnameCmd( if (namespacePtr == NULL) { return TCL_ERROR; } - result = TclPushStackFrame(interp, &framePtr, namespacePtr, + (void) TclPushStackFrame(interp, &framePtr, namespacePtr, /*isProcCallFrame*/ 0); - if (result != TCL_OK) { - return result; - } } variable = Tcl_FindNamespaceVar(interp, name, NULL, |