guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

02/02: gnu: withershins: Use new "libiberty" package.


From: Ricardo Wurmus
Subject: 02/02: gnu: withershins: Use new "libiberty" package.
Date: Mon, 29 Jun 2015 19:01:40 +0000

rekado pushed a commit to branch master
in repository guix.

commit 257341086549ed8a02ea35d50593696127f1eed5
Author: Ricardo Wurmus <address@hidden>
Date:   Sun Jun 28 10:22:45 2015 +0200

    gnu: withershins: Use new "libiberty" package.
    
    * gnu/packages/code.scm (withershins)[inputs]: Replace "gcc" with 
"libiberty".
       [arguments]: Simplify "find-libiberty" phase.
---
 gnu/packages/code.scm |   20 ++++++--------------
 1 files changed, 6 insertions(+), 14 deletions(-)

diff --git a/gnu/packages/code.scm b/gnu/packages/code.scm
index bcd1082..38f1438 100644
--- a/gnu/packages/code.scm
+++ b/gnu/packages/code.scm
@@ -246,25 +246,17 @@ files, but compared to grep is much faster and respects 
files like .gitignore,
     (build-system cmake-build-system)
     (arguments
      `(#:out-of-source? #f
-       #:modules ((guix build utils)
-                  (guix build cmake-build-system)
-                  (ice-9 popen)
-                  (ice-9 rdelim))
        #:phases
        (modify-phases %standard-phases
          (add-after
           'unpack 'find-libiberty
           (lambda _
-            (let ((plugin (let* ((port (open-input-pipe
-                                        "gcc -print-file-name=plugin"))
-                                 (str  (read-line port)))
-                            (close-pipe port)
-                            str)))
+            (let ((libiberty (assoc-ref %build-inputs "libiberty")))
               (substitute* "cmake/FindIberty.cmake"
-                (("/usr/include") (string-append plugin "/include"))
-                (("libiberty.a iberty") (string-append "NAMES libiberty.a 
iberty\nPATHS \""
-                                                       (assoc-ref 
%build-inputs "gcc")
-                                                       "/lib" "\"")))
+                (("/usr/include") (string-append libiberty "/include"))
+                (("libiberty.a iberty")
+                 (string-append "NAMES libiberty.a iberty\nPATHS \""
+                                libiberty "/lib" "\"")))
               #t)))
          (replace
           'install
@@ -279,7 +271,7 @@ files, but compared to grep is much faster and respects 
files like .gitignore,
             #t)))))
     (home-page "https://github.com/cameronwhite/withershins";)
     (inputs
-     `(("gcc" ,gcc-4.8 "lib") ;for libiberty.a
+     `(("libiberty" ,libiberty)
        ("binutils" ,binutils) ;for libbfd
        ("zlib" ,zlib)))
     (synopsis "C++11 library for generating stack traces")



reply via email to

[Prev in Thread] Current Thread [Next in Thread]