summaryrefslogtreecommitdiffstats
path: root/generic/tclNamesp.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclNamesp.c')
-rw-r--r--generic/tclNamesp.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c
index 22743a5..f6827aa 100644
--- a/generic/tclNamesp.c
+++ b/generic/tclNamesp.c
@@ -3157,8 +3157,7 @@ NamespaceExportCmd(dummy, interp, objc, objv)
*/
firstArg = 2;
- if ((objc > firstArg)
- && (strcmp("-clear", Tcl_GetString(objv[firstArg])) == 0)) {
+ if (strcmp("-clear", Tcl_GetString(objv[firstArg])) == 0) {
Tcl_Export(interp, NULL, "::", 1);
Tcl_ResetResult(interp);
firstArg++;