diff options
| -rw-r--r-- | build-aux/compile-as-derivation.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/build-aux/compile-as-derivation.scm b/build-aux/compile-as-derivation.scm index d945a8c79c6..9da13893b51 100644 --- a/build-aux/compile-as-derivation.scm +++ b/build-aux/compile-as-derivation.scm | |||
| @@ -41,6 +41,10 @@ | |||
| 41 | 41 | ||
| 42 | (match (command-line) | 42 | (match (command-line) |
| 43 | ((program source) | 43 | ((program source) |
| 44 | ;; The build procedure outputs to this port, so setup buffering to avoid | ||
| 45 | ;; one char per syscall. | ||
| 46 | (setvbuf (current-error-port) 'line) | ||
| 47 | |||
| 44 | (with-error-handling | 48 | (with-error-handling |
| 45 | (with-store store | 49 | (with-store store |
| 46 | (let* ((script (string-append source "/build-aux/build-self.scm")) | 50 | (let* ((script (string-append source "/build-aux/build-self.scm")) |