diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-16 23:21:20 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-16 23:21:20 (GMT) |
commit | 4b1dc921ef04bb9bce6f37daf7c15c30f325ff5e (patch) | |
tree | 52cba60bacedffb3570138e2bd4a6096981d8c37 /generic/tclScan.c | |
parent | bf9931fbfa4e7ff35d60d115f5f63e886305af3d (diff) | |
download | tcl-4b1dc921ef04bb9bce6f37daf7c15c30f325ff5e.zip tcl-4b1dc921ef04bb9bce6f37daf7c15c30f325ff5e.tar.gz tcl-4b1dc921ef04bb9bce6f37daf7c15c30f325ff5e.tar.bz2 |
Revise macro usage
Diffstat (limited to 'generic/tclScan.c')
-rw-r--r-- | generic/tclScan.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclScan.c b/generic/tclScan.c index 222b06d..3dcc9ea 100644 --- a/generic/tclScan.c +++ b/generic/tclScan.c @@ -942,7 +942,7 @@ Tcl_ScanObjCmd( break; } if (flags & SCAN_LONGER) { - if (Tcl_GetWideIntFromObj(NULL, objPtr, &wideValue) != TCL_OK) { + if (TclGetWideIntFromObj(NULL, objPtr, &wideValue) != TCL_OK) { if (TclGetString(objPtr)[0] == '-') { wideValue = WIDE_MIN; } else { |