summary refs log tree commit diff
path: root/build-aux/build-self.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-03-26 11:36:33 +0100
committerLudovic Courtès <ludo@gnu.org>2019-03-26 18:11:52 +0100
commitec8bc4a34e99363f80b0156587892b5623709098 (patch)
tree9df56f905ed784034af9918c3e2bc94dc74f4395 /build-aux/build-self.scm
parent863519f660fdebefbbb7f7c18b4875ba9b05f74c (diff)
downloadguix-ec8bc4a34e99363f80b0156587892b5623709098.tar.gz
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'.
Diffstat (limited to 'build-aux/build-self.scm')
-rw-r--r--build-aux/build-self.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/build-aux/build-self.scm b/build-aux/build-self.scm
index d18b4504cf..a8b05eb0ff 100644
--- a/build-aux/build-self.scm
+++ b/build-aux/build-self.scm
@@ -313,7 +313,11 @@ interface (FFI) of Guile.")
                           (cons (string-append #$guile-gcrypt "/lib/guile/"
                                                (effective-version)
                                                "/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)
                                    (guix self)