summaryrefslogtreecommitdiffstats
path: root/generic/tclClock.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2019-02-25 19:50:43 (GMT)
committerdgp <dgp@users.sourceforge.net>2019-02-25 19:50:43 (GMT)
commitc5fc098588f330557b3b42404a426c521b46f4a2 (patch)
tree571e338680983e5e8921437dea9c8245eb9adc3f /generic/tclClock.c
parent3789b98a4949916a96bb57312c9a5a7713e00aaa (diff)
downloadtcl-c5fc098588f330557b3b42404a426c521b46f4a2.zip
tcl-c5fc098588f330557b3b42404a426c521b46f4a2.tar.gz
tcl-c5fc098588f330557b3b42404a426c521b46f4a2.tar.bz2
New internal macro TclHasIntRep() to re-encapsulate the typePtr field.
Diffstat (limited to 'generic/tclClock.c')
-rw-r--r--generic/tclClock.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclClock.c b/generic/tclClock.c
index 2c25f6c..233ddd2 100644
--- a/generic/tclClock.c
+++ b/generic/tclClock.c
@@ -452,7 +452,7 @@ ClockGetdatefieldsObjCmd(
* that it isn't.
*/
- if (objv[1]->typePtr == &tclBignumType) {
+ if (TclHasIntRep(objv[1], &tclBignumType)) {
Tcl_SetObjResult(interp, literals[LIT_INTEGER_VALUE_TOO_LARGE]);
return TCL_ERROR;
}