summaryrefslogtreecommitdiff
path: root/guix/utils.scm
diff options
context:
space:
mode:
authorEfraim Flashner <efraim@flashner.co.il>2020-12-28 19:00:30 +0200
committerEfraim Flashner <efraim@flashner.co.il>2020-12-28 19:04:34 +0200
commit3d395e3d831057346b79a58eae742950e49c9460 (patch)
tree1d580d9192c6ea88ba9b637fdfa5729a7918db96 /guix/utils.scm
parent646233094e4b6361626e59ff582017724a31e86a (diff)
downloadguix-patches-3d395e3d831057346b79a58eae742950e49c9460.tar
guix-patches-3d395e3d831057346b79a58eae742950e49c9460.tar.gz
utils: Add pkg-config-for-target.
* guix/utils.scm (pkg-config-for-target): New procedure.
Diffstat (limited to 'guix/utils.scm')
-rw-r--r--guix/utils.scm6
1 files changed, 6 insertions, 0 deletions
diff --git a/guix/utils.scm b/guix/utils.scm
index a591b62f30..0df46f1062 100644
--- a/guix/utils.scm
+++ b/guix/utils.scm
@@ -79,6 +79,7 @@
target-64bit?
cc-for-target
cxx-for-target
+ pkg-config-for-target
version-compare
version>?
@@ -548,6 +549,11 @@ a character other than '@'."
(string-append target "-g++")
"g++"))
+(define* (pkg-config-for-target #:optional (target (%current-target-system)))
+ (if target
+ (string-append target "-pkg-config")
+ "pkg-config"))
+
(define version-compare
(let ((strverscmp
(let ((sym (or (dynamic-func "strverscmp" (dynamic-link))