From: Reini U. <ru...@x-...> - 2009-07-21 06:14:45
|
2009/7/20 Sam Steingold <sd...@gn...>: > Aleksej Saushev wrote: >> Sam Steingold <sd...@gn...> writes: >>> please test cvs head - I hope to release it as 2.48 this week. >> This midnight (UTC) snapshot, NetBSD: >> >> $ cat /tmp/wip/clisp/work/clisp/src/syscalls/test.erg >> Form: (LET ((PID (RUN-SLEEP 1))) (KILL PID :SIGTERM) (MULTIPLE-VALUE-BIND (PID1 KIND STATUS RUSAGE) (WAIT :PID PID :USAGE T) (ASSERT (= PID PID1) NIL "pid: ~S<>~S" PID PID1) (LIST KIND STATUS (USAGE-P (SHOW RUSAGE))))) >> CORRECT: (:SIGNALED :SIGTERM T) >> CLISP : ERROR >> UNIX error 10 (ECHILD): No child processes >> >> OUT: >> "[SIMPLE-OS-ERROR]: UNIX error 10 (ECHILD): No child processes I would try to add a little sleep after the run-sleep as I did on cygwin recently. (let ((pid (run-sleep 5))) #+(or cygwin netbsd) (sleep 0.3) (posix:kill pid :SIGSTOP) #+(or cygwin netbsd) (sleep 0.1) The OS needs a little time to launch the process, and in my case also to propagate the signal. -- Reini Urban http://phpwiki.org/ http://murbreak.at/ |