fixed backward subprocess-kill handling of force argument
svn: r3838
This commit is contained in:
parent
dee6758656
commit
0bab258328
|
@ -6733,7 +6733,7 @@ static Scheme_Object *subprocess_kill(int argc, Scheme_Object **argv)
|
|||
if (sc->done)
|
||||
return scheme_void;
|
||||
|
||||
if (!kill(sp->pid, SCHEME_TRUEP(argv[1]) ? SIGINT : SIGKILL))
|
||||
if (!kill(sp->pid, SCHEME_TRUEP(argv[1]) ? SIGKILL : SIGINT))
|
||||
return scheme_void;
|
||||
|
||||
if (errno != EINTR)
|
||||
|
|
Loading…
Reference in New Issue
Block a user