diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-11-25 16:26:04 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-11-25 16:26:04 (GMT) |
| commit | 481aa42029e2a2bb8afd32bcfa3d3f5cea897f6a (patch) | |
| tree | 327719a3c06587aa76044ab356e907a37d99accd /generic/tclCmdIL.c | |
| parent | 73116e2c54973fea6efc412b979d78999df3a08a (diff) | |
| parent | b816a585c00c97feca1b4516769ccf2769a58e02 (diff) | |
| download | tcl-481aa42029e2a2bb8afd32bcfa3d3f5cea897f6a.zip tcl-481aa42029e2a2bb8afd32bcfa3d3f5cea897f6a.tar.gz tcl-481aa42029e2a2bb8afd32bcfa3d3f5cea897f6a.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclCmdIL.c')
| -rw-r--r-- | generic/tclCmdIL.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCmdIL.c b/generic/tclCmdIL.c index 1ca6c5e..2216745 100644 --- a/generic/tclCmdIL.c +++ b/generic/tclCmdIL.c @@ -4111,10 +4111,10 @@ SequenceIdentifyArgument( exprValueObj = argPtr; } else { if (floor(dvalue) == dvalue) { - exprValueObj = Tcl_NewWideIntObj(value); + TclNewIntObj(exprValueObj, value); keyword = TCL_NUMBER_INT; } else { - exprValueObj = Tcl_NewDoubleObj(dvalue); + TclNewDoubleObj(exprValueObj, dvalue); keyword = TCL_NUMBER_DOUBLE; } } |