1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-05-26 19:11:46 +02:00

gnu: openssl: Don't error when targeting avr.

* gnu/packages/tls.scm (target->openssl-target): Add case for avr.

Change-Id: I1cfc8b50fa4b2b864f8f8aa8898cc405ffc02580
This commit is contained in:
Efraim Flashner
2023-12-12 09:31:18 +02:00
parent f03029a00e
commit baeff7f546
+8 -4
View File
@@ -409,12 +409,16 @@ OpenSSL for TARGET."
;; Keep this code outside the build code, ;; Keep this code outside the build code,
;; such that new targets can be added ;; such that new targets can be added
;; without causing rebuilds for other targets. ;; without causing rebuilds for other targets.
(if (target-mingw? target) (cond
(string-append ((target-mingw? target)
(string-append
"mingw" "mingw"
(if (target-x86-64? target) (if (target-x86-64? target)
"64" "64"
"")) "")))
;; AVR doesn't seem to be supported.
((target-avr? target) #f)
(else
(let ((kernel (let ((kernel
(cond ((target-hurd? target) (cond ((target-hurd? target)
"hurd") "hurd")
@@ -450,7 +454,7 @@ OpenSSL for TARGET."
"generic64") "generic64")
(else (else
(error "unsupported openssl target architecture"))))) (error "unsupported openssl target architecture")))))
(string-append kernel "-" arch)))) (string-append kernel "-" arch)))))
(define-public openssl-1.1 (define-public openssl-1.1
(package (package