gnu: hwloc: Propagate libpciaccess.

* gnu/packages/mpi.scm (hwloc)[inputs]: Move LIBPCIACCESS to...
  [propagated-inputs]: ... here.  New field.
This commit is contained in:
Ludovic Courtès 2015-08-24 00:28:36 +02:00
parent 63b1bdbc43
commit c6e59259fd
1 changed files with 6 additions and 3 deletions

View File

@ -1,6 +1,6 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2014, 2015 Eric Bavier <bavier@member.fsf.org> ;;; Copyright © 2014, 2015 Eric Bavier <bavier@member.fsf.org>
;;; Copyright © 2014 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2014, 2015 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2014 Ian Denhardt <ian@zenhack.net> ;;; Copyright © 2014 Ian Denhardt <ian@zenhack.net>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
@ -57,8 +57,10 @@
("cairo" ,cairo) ("cairo" ,cairo)
("ncurses" ,ncurses) ("ncurses" ,ncurses)
("numactl" ,numactl) ("numactl" ,numactl)
("libpciaccess" ,libpciaccess)
("expat" ,expat))) ("expat" ,expat)))
(propagated-inputs
;; hwloc.pc lists it in 'Requires.private'.
`(("libpciaccess" ,libpciaccess)))
(native-inputs (native-inputs
`(("pkg-config" ,pkg-config))) `(("pkg-config" ,pkg-config)))
(arguments (arguments
@ -72,7 +74,8 @@
(numa (assoc-ref inputs "numactl"))) (numa (assoc-ref inputs "numactl")))
(substitute* (map (lambda (f) (string-append out "/" f)) (substitute* (map (lambda (f) (string-append out "/" f))
'("lib/pkgconfig/hwloc.pc" "lib/libhwloc.la")) '("lib/pkgconfig/hwloc.pc" "lib/libhwloc.la"))
(("-lnuma" lib) (string-append "-L" numa "/lib " lib))))))))) (("-lnuma" lib)
(string-append "-L" numa "/lib " lib)))))))))
(home-page "http://www.open-mpi.org/projects/hwloc/") (home-page "http://www.open-mpi.org/projects/hwloc/")
(synopsis "Abstraction of hardware architectures") (synopsis "Abstraction of hardware architectures")
(description (description