diff options
-rw-r--r-- | src/cuirass/base.scm | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/src/cuirass/base.scm b/src/cuirass/base.scm index c1e6383..143bc2e 100644 --- a/src/cuirass/base.scm +++ b/src/cuirass/base.scm @@ -423,7 +423,6 @@ Essentially this procedure inverts the inversion-of-control that (catch #t (lambda () (guard (c ((store-error? c) - (close-port output) (atomic-box-set! result c))) (parameterize ((current-build-output-port output)) (let ((x (build-derivations store lst))) |