~ruther/guix-local: build-system/gnu: Gracefully handle dangling symlinks in the 'strip' phase.

f8bcf1935a18e9a728e824030b3ded4fb63638cf — Ludovic Courtès 11 years ago c23d170

build-system/gnu: Gracefully handle dangling symlinks in the 'strip' phase.

* guix/build/gnu-build-system.scm (strip): Check whether 'file-exists?'
  before calling 'elf-file?' and 'ar-file?'.  This should fix build
  failures in the presence of dangling symlinks, as in
  <http://hydra.gnu.org/build/167521/nixlog/1/raw>.

patch browse .tar.gz

1 files changed, 2 insertions(+), 1 deletions(-)

M guix/build/gnu-build-system.scm

M guix/build/gnu-build-system.scm => guix/build/gnu-build-system.scm +2 -1

@@ 343,7 343,8 @@ makefiles."
               debug-output objcopy-command))
     (file-system-fold (const #t)
                       (lambda (path stat result)  ; leaf
-                        (and (or (elf-file? path) (ar-file? path))
+                        (and (file-exists? path)  ;discard dangling symlinks
+                             (or (elf-file? path) (ar-file? path))
                              (or (not debug-output)
                                  (make-debug-file path))
                              (zero? (apply system* strip-command