mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-09 13:30:26 +02:00
tests: Remove leftover `pk'.
* test-suite/tests/posix.test ("system*"): Remove `pk'.
This commit is contained in:
parent
668ba7c955
commit
c23fb152b7
1 changed files with 1 additions and 1 deletions
|
@ -209,5 +209,5 @@
|
|||
;; With Guile up to 2.0.7 included, the child process launched by
|
||||
;; `system*' would remain alive after an `execvp' failure.
|
||||
(let ((me (getpid)))
|
||||
(and (not (zero? (pk (system* "something-that-does-not-exist"))))
|
||||
(and (not (zero? (system* "something-that-does-not-exist")))
|
||||
(= me (getpid))))))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue