diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-12-30 16:36:12 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-12-30 16:36:12 (GMT) |
| commit | c53d98725fb23b759e0fa9b4cff521758ab054ef (patch) | |
| tree | fab9b12d8f685f94568b09e610301f83938c5166 /unix/tclUnixTest.c | |
| parent | 21068ce2b708810c474f5cc2f6c11438114ad1d6 (diff) | |
| parent | 3b06f70775be10c7547c05c27e55d4ef0a65ee0c (diff) | |
| download | tcl-dkf_asm_crash_20131022.zip tcl-dkf_asm_crash_20131022.tar.gz tcl-dkf_asm_crash_20131022.tar.bz2 | |
merge trunkdkf_asm_crash_20131022
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; } |