ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-13 06:36:37 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

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

Browse source 
This reverts commit baeff7f546.
This commit is contained in:
Efraim Flashner 2023-12-12 13:56:57 +02:00
parent 92e2de6fb4
commit c7215819e1
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 4 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
gnu/packages/tls.scm
View file

@ -409,16 +409,12 @@ (define (target->openssl-target 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.
(cond (if (target-mingw? target)
((target-mingw? target)
(string-append (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")
@ -454,7 +450,7 @@ (define (target->openssl-target 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