guix-commits
[Top][All Lists]
Advanced

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

10/52: build-system/meson: Allow 'configure-flags' to be a G-exp.


From: guix-commits
Subject: 10/52: build-system/meson: Allow 'configure-flags' to be a G-exp.
Date: Mon, 20 Sep 2021 07:19:29 -0400 (EDT)

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

commit fa81c31ce988f05494e79facc50deb1a590fcbb8
Author: Maxime Devos <maximedevos@telenet.be>
AuthorDate: Tue Aug 24 11:03:25 2021 +0200

    build-system/meson: Allow 'configure-flags' to be a G-exp.
    
    * guix/build-system/meson.scm
      (meson-build, meson-cross-build): Only call 'sexp->gexp' on
      'configure-flags' when 'configure-flags' is a pair.
---
 guix/build-system/meson.scm | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/guix/build-system/meson.scm b/guix/build-system/meson.scm
index dae0abd..dcad3f3 100644
--- a/guix/build-system/meson.scm
+++ b/guix/build-system/meson.scm
@@ -212,7 +212,10 @@ has a 'meson.build' file."
                                                 (map 
search-path-specification->sexp
                                                      search-paths))
                              #:phases build-phases
-                             #:configure-flags #$(sexp->gexp configure-flags)
+                             #:configure-flags
+                             #$(if (pair? configure-flags)
+                                   (sexp->gexp configure-flags)
+                                   configure-flags)
                              #:build-type #$build-type
                              #:tests? #$tests?
                              #:test-target #$test-target
@@ -309,7 +312,9 @@ SOURCE has a 'meson.build' file."
                        #:phases build-phases
                        #:make-dynamic-linker-cache? 
#$make-dynamic-linker-cache?
                        #:configure-flags `("--cross-file" #+cross-file
-                                           ,@#$(sexp->gexp configure-flags))
+                                           ,@#$(if (pair? configure-flags)
+                                                   (sexp->gexp configure-flags)
+                                                   configure-flags))
                        #:build-type #$build-type
                        #:tests? #$tests?
                        #:test-target #$test-target



reply via email to

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