diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2012-12-19 23:31:05 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2012-12-19 23:31:05 +0100 |
| commit | c23fb152b708697473603c9b893a7fd7a30b6561 (patch) | |
| tree | c88ee3eafe611c1177515dfb52b7c112b75eb545 | |
| parent | 668ba7c95594b8294e46027dfade8fa0adb25614 (diff) | |
| download | guile-c23fb152b708697473603c9b893a7fd7a30b6561.tar.gz | |
tests: Remove leftover `pk'.
* test-suite/tests/posix.test ("system*"): Remove `pk'.
| -rw-r--r-- | test-suite/tests/posix.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test-suite/tests/posix.test b/test-suite/tests/posix.test index ebfb20ed4..00e9c682e 100644 --- a/test-suite/tests/posix.test +++ b/test-suite/tests/posix.test @@ -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)))))) |