summaryrefslogtreecommitdiffstats
path: root/unix/tclUnixTest.c
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2013-10-29 20:08:41 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2013-10-29 20:08:41 (GMT)
commit37fbc7330c9e687eac6bc39a0bce202bb4bf83d5 (patch)
tree3536ead9422ebee103f7072d4e988080a6c61f57 /unix/tclUnixTest.c
parent3b3f0179aee2dce77bfef12308c53429523675bc (diff)
parenta401663e7ef33d1bf2c2a2590ed3945c4c864760 (diff)
downloadtcl-37fbc7330c9e687eac6bc39a0bce202bb4bf83d5.zip
tcl-37fbc7330c9e687eac6bc39a0bce202bb4bf83d5.tar.gz
tcl-37fbc7330c9e687eac6bc39a0bce202bb4bf83d5.tar.bz2
merge trunk
Diffstat (limited to 'unix/tclUnixTest.c')
-rw-r--r--unix/tclUnixTest.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/unix/tclUnixTest.c b/unix/tclUnixTest.c
index 21a7bad..4b0f369 100644
--- a/unix/tclUnixTest.c
+++ b/unix/tclUnixTest.c
@@ -566,12 +566,11 @@ TestforkObjCmd(
"Cannot fork", NULL);
return TCL_ERROR;
}
-#if !defined(HAVE_PTHREAD_ATFORK)
- /* Only needed when pthread_atfork is not present. */
+ /* Only needed when pthread_atfork is not present,
+ * should not hurt otherwise. */
if (pid==0) {
Tcl_InitNotifier();
}
-#endif
Tcl_SetObjResult(interp, Tcl_NewIntObj(pid));
return TCL_OK;
}