diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-05-15 11:52:39 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-05-15 11:52:39 (GMT) |
commit | f6f92fd671de0e358ea37d1745600a106c78b6c0 (patch) | |
tree | 0335cdde4ca23b25b41490ff68882bfadc1df9ea /compat/waitpid.c | |
parent | 48d6b3d84c72484ce405d0c3f3c3c301b2222331 (diff) | |
parent | f2f41b4b85e855ef94dbfcd86d4e9d6cc7ae14b1 (diff) | |
download | tcl-f6f92fd671de0e358ea37d1745600a106c78b6c0.zip tcl-f6f92fd671de0e358ea37d1745600a106c78b6c0.tar.gz tcl-f6f92fd671de0e358ea37d1745600a106c78b6c0.tar.bz2 |
Merge 8.7
Diffstat (limited to 'compat/waitpid.c')
-rw-r--r-- | compat/waitpid.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/compat/waitpid.c b/compat/waitpid.c index cf025b0..cd04d8b 100644 --- a/compat/waitpid.c +++ b/compat/waitpid.c @@ -156,7 +156,11 @@ waitpid( goto waitAgain; } } - waitPtr = (WaitInfo *) Tcl_Alloc(sizeof(WaitInfo)); + waitPtr = (WaitInfo *) Tcl_AttemptAlloc(sizeof(WaitInfo)); + if (!waitPtr) { + errno = ENOMEM; + return -1; + } waitPtr->pid = result; waitPtr->status = status; waitPtr->nextPtr = deadList; |