utils: Add pkg-config-for-target.

* guix/utils.scm (pkg-config-for-target): New procedure.
2020-12-28 19:00:30 +02:00 · 2020-12-28 19:00:30 +02:00 · 3d395e3d83
commit 3d395e3d83
parent 646233094e
1 changed files with 6 additions and 0 deletions
--- 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))