summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2017-04-27 17:19:31 (GMT)
committerdgp <dgp@users.sourceforge.net>2017-04-27 17:19:31 (GMT)
commit2836feb5d8fbaffcd6371c423cd0a0b0eebac840 (patch)
treefdfc02af2f602ec061d3ab1ad77ab2bf3586dcd2 /generic
parentada887f2ef7727135a81639bc1fd6513ef6c8f43 (diff)
downloadtcl-2836feb5d8fbaffcd6371c423cd0a0b0eebac840.zip
tcl-2836feb5d8fbaffcd6371c423cd0a0b0eebac840.tar.gz
tcl-2836feb5d8fbaffcd6371c423cd0a0b0eebac840.tar.bz2
[04e26c02c0] Remove useless condition that raises warnings.
Diffstat (limited to 'generic')
-rw-r--r--generic/tclExecute.c6
1 files changed, 2 insertions, 4 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index cb4e6dc..d30e757 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -510,8 +510,7 @@ VarHashCreateVar(
: (*(tPtr) = TCL_NUMBER_DOUBLE)), \
*(ptrPtr) = (ClientData) \
(&((objPtr)->internalRep.doubleValue)), TCL_OK) : \
- ((((objPtr)->typePtr == NULL) && ((objPtr)->bytes == NULL)) || \
- (((objPtr)->bytes != NULL) && ((objPtr)->length == 0))) \
+ (((objPtr)->bytes != NULL) && ((objPtr)->length == 0)) \
? (*(tPtr) = TCL_NUMBER_LONG),TCL_ERROR : \
TclGetNumberFromObj((interp), (objPtr), (ptrPtr), (tPtr)))
#else /* !TCL_WIDE_INT_IS_LONG */
@@ -530,8 +529,7 @@ VarHashCreateVar(
: (*(tPtr) = TCL_NUMBER_DOUBLE)), \
*(ptrPtr) = (ClientData) \
(&((objPtr)->internalRep.doubleValue)), TCL_OK) : \
- ((((objPtr)->typePtr == NULL) && ((objPtr)->bytes == NULL)) || \
- (((objPtr)->bytes != NULL) && ((objPtr)->length == 0))) \
+ (((objPtr)->bytes != NULL) && ((objPtr)->length == 0)) \
? (*(tPtr) = TCL_NUMBER_LONG),TCL_ERROR : \
TclGetNumberFromObj((interp), (objPtr), (ptrPtr), (tPtr)))
#endif /* TCL_WIDE_INT_IS_LONG */