guix-commits
[Top][All Lists]
Advanced

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

03/06: gnu: cross-base: Return #t from all phases.


From: Mark H. Weaver
Subject: 03/06: gnu: cross-base: Return #t from all phases.
Date: Fri, 16 Mar 2018 09:09:34 -0400 (EDT)

mhw pushed a commit to branch core-updates
in repository guix.

commit 1e5005e2eea867c6e762c1fb97731080b6666498
Author: Mark H Weaver <address@hidden>
Date:   Fri Mar 16 07:33:37 2018 -0400

    gnu: cross-base: Return #t from all phases.
    
    * gnu/packages/cross-base.scm (cross-kernel-headers)[xlinux-headers]: Use
    invoke.
---
 gnu/packages/cross-base.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/cross-base.scm b/gnu/packages/cross-base.scm
index 8dede77..ea717fc 100644
--- a/gnu/packages/cross-base.scm
+++ b/gnu/packages/cross-base.scm
@@ -1,6 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2013, 2014, 2015, 2016, 2017 Ludovic Courtès <address@hidden>
-;;; Copyright © 2014, 2015 Mark H Weaver <address@hidden>
+;;; Copyright © 2014, 2015, 2018 Mark H Weaver <address@hidden>
 ;;; Copyright © 2016 Jan Nieuwenhuizen <address@hidden>
 ;;; Copyright © 2016 Manolis Fragkiskos Ragkousis <address@hidden>
 ;;; Copyright © 2018 Tobias Geerinckx-Rice <address@hidden>
@@ -292,8 +292,8 @@ target that libc."
               (setenv "ARCH" ,(system->linux-architecture target))
               (format #t "`ARCH' set to `~a' (cross compiling)~%" (getenv 
"ARCH"))
 
-              (and (zero? (system* "make" ,(system->defconfig target)))
-                   (zero? (system* "make" "mrproper" "headers_check"))))
+              (invoke "make" ,(system->defconfig target))
+              (invoke "make" "mrproper" "headers_check"))
             ,phases))))
       (native-inputs `(("cross-gcc" ,xgcc)
                        ("cross-binutils" ,xbinutils)



reply via email to

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