build-self: Disable position recording.

'guix pull -n' goes roughly from 40s to 35s.

* build-aux/build-self.scm (build-program): Add call to 'read-disable'.
This commit is contained in:
Ludovic Courtès 2019-03-26 11:36:33 +01:00
parent 863519f660
commit ec8bc4a34e
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 5 additions and 1 deletions

View File

@ -313,7 +313,11 @@ interface (FFI) of Guile.")
(cons (string-append #$guile-gcrypt "/lib/guile/" (cons (string-append #$guile-gcrypt "/lib/guile/"
(effective-version) (effective-version)
"/site-ccache") "/site-ccache")
%load-compiled-path))) %load-compiled-path))
;; Disable position recording to save time and space
;; when loading the package modules.
(read-disable 'positions))
(use-modules (guix store) (use-modules (guix store)
(guix self) (guix self)