diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2022-05-20 18:45:24 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2022-05-20 18:46:07 +0200 |
| commit | 598f7289db9955584457ffc11c8504f3938a1618 (patch) | |
| tree | fb0144df4e3de922febf1ee050a3c7a9e67cf3c1 /build-aux/cuirass | |
| parent | a4994d739306abcf3f36706012fb88b35a970e6b (diff) | |
| download | guix-598f7289db9955584457ffc11c8504f3938a1618.tar guix-598f7289db9955584457ffc11c8504f3938a1618.tar.gz | |
cuirass: Close each inferior upon completion.
* build-aux/cuirass/evaluate.scm <top level>: Add 'close-inferior' call.
Diffstat (limited to 'build-aux/cuirass')
| -rw-r--r-- | build-aux/cuirass/evaluate.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/build-aux/cuirass/evaluate.scm b/build-aux/cuirass/evaluate.scm index fc0744ad2a..0bd9e2481f 100644 --- a/build-aux/cuirass/evaluate.scm +++ b/build-aux/cuirass/evaluate.scm @@ -96,6 +96,7 @@ (channels . ,channels)))))) (file (string-append directory "/jobs-" system ".scm"))) + (close-inferior inferior) (call-with-output-file file (lambda (port) (write jobs port))))))) |