summaryrefslogtreecommitdiffstats
path: root/unix/tclUnixTest.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2018-12-12 20:14:19 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2018-12-12 20:14:19 (GMT)
commit12859211484cfae1ab06fb9e00aebecfeca9ec1e (patch)
treeae1b6847b057013742e00de29e2562fb8461530b /unix/tclUnixTest.c
parentc60e1a679dc096b076279e0ef80a82fe41223a51 (diff)
parent1961633531b70d5a6e627f86153f4d15e722ea8b (diff)
downloadtcl-12859211484cfae1ab06fb9e00aebecfeca9ec1e.zip
tcl-12859211484cfae1ab06fb9e00aebecfeca9ec1e.tar.gz
tcl-12859211484cfae1ab06fb9e00aebecfeca9ec1e.tar.bz2
Merge 8.7
Diffstat (limited to 'unix/tclUnixTest.c')
-rw-r--r--unix/tclUnixTest.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/unix/tclUnixTest.c b/unix/tclUnixTest.c
index ea28e18..e59a0e3 100644
--- a/unix/tclUnixTest.c
+++ b/unix/tclUnixTest.c
@@ -570,7 +570,7 @@ TestforkObjCmd(
if (pid==0) {
Tcl_InitNotifier();
}
- Tcl_SetObjResult(interp, Tcl_NewIntObj(pid));
+ Tcl_SetObjResult(interp, Tcl_NewWideIntObj(pid));
return TCL_OK;
}