me
/
guix
Archived
1
0
Fork 0

gnu: astyle: Install header file, too.

* gnu/packages/code.scm(astyle)[arguments]<phases>{install-libs}: Also
  install header file.
master
Hartmut Goebel 2019-11-06 22:50:31 +01:00
parent 62b8ae1a91
commit 0c6ab52243
No known key found for this signature in database
GPG Key ID: 634A8DFFD3F631DF
1 changed files with 5 additions and 1 deletions

View File

@ -607,8 +607,9 @@ Objective@tie{}C, D, Java, Pawn, and Vala). Features:
(lambda _ (chdir "build/gcc") #t)) (lambda _ (chdir "build/gcc") #t))
(add-after 'install 'install-libs (add-after 'install 'install-libs
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
;; Libraries are not installed by default ;; Libraries and includes are not installed by default
(let* ((output (assoc-ref outputs "out")) (let* ((output (assoc-ref outputs "out"))
(incdir (string-append output "/include"))
(libdir (string-append output "/lib"))) (libdir (string-append output "/lib")))
(define (make-so-link sofile strip-pattern) (define (make-so-link sofile strip-pattern)
(symlink (symlink
@ -616,6 +617,9 @@ Objective@tie{}C, D, Java, Pawn, and Vala). Features:
(regexp-substitute #f (regexp-substitute #f
(string-match strip-pattern sofile) (string-match strip-pattern sofile)
'pre))) 'pre)))
(mkdir-p incdir)
(copy-file "../../src/astyle.h"
(string-append incdir "/astyle.h"))
(mkdir-p libdir) (mkdir-p libdir)
(for-each (lambda (l) (for-each (lambda (l)
(copy-file (copy-file