diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2013-10-29 20:08:41 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2013-10-29 20:08:41 (GMT) |
| commit | efa791f58b11b26517b69bc62df734cd91275ee0 (patch) | |
| tree | 3536ead9422ebee103f7072d4e988080a6c61f57 /unix/tclUnixTest.c | |
| parent | bc8401949587c09eb56c1b50d773c6a07e6d66aa (diff) | |
| parent | 89c02b35e1dda98920322d5f292a1aa15433bfef (diff) | |
| download | tcl-efa791f58b11b26517b69bc62df734cd91275ee0.zip tcl-efa791f58b11b26517b69bc62df734cd91275ee0.tar.gz tcl-efa791f58b11b26517b69bc62df734cd91275ee0.tar.bz2 | |
merge trunk
Diffstat (limited to 'unix/tclUnixTest.c')
| -rw-r--r-- | unix/tclUnixTest.c | 5 |
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; } |