guile-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Support for (system '("echo" "foo" "bar"))


From: Kevin Ryde
Subject: Re: Support for (system '("echo" "foo" "bar"))
Date: Sat, 01 Nov 2003 08:42:49 +1000
User-agent: Gnus/5.1003 (Gnus v5.10.3) Emacs/21.3 (gnu/linux)

address@hidden (Paul Jarc) writes:
>
>   (let* ((pid (apply system*/nowait args))
>          (old-int  (sigaction SIGINT  SIG_IGN))
>          (old-quit (sigaction SIGQUIT SIG_IGN))

In glibc the ignores are put on before the fork (and undone again in
the child).  Presumably to avoid a gap where the child is running but
the parent is not yet ignoring.

Oh, and SIGCHLD is blocked until after waitpid.

(Code below, for those who don't have it handy.)

Attachment: system.c
Description: Text Data


reply via email to

[Prev in Thread] Current Thread [Next in Thread]