nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

build-system/gnu: Strip 'ar' archives as well. 

* guix/build/gnu-build-system.scm (strip): Also strip when (ar-file?
  PATH) is true.
This commit is contained in:
Ludovic Courtès 2014-11-22 21:54:27 +01:00
parent 2bbc6db5e2
commit e8c7fdda5d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
guix/build/gnu-build-system.scm
View File

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