gnu: postgresql-13: Fix building on riscv64-linux.

* gnu/packages/databases.scm (postgresql-13)[arguments]: Add phase when
buidling for riscv64-linux to apply a patch.
[native-inputs]: When building for riscv64-linux add patch and patch
file.
* gnu/packages/patches/postgresql-riscv-spinlocks.patch: New file.
* gnu/local.mk (dist_patch_DATA): Register it.
This commit is contained in:
Efraim Flashner 2022-02-20 12:30:17 +02:00
parent bc11d9ceb2
commit 781dd2de23
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
3 changed files with 65 additions and 1 deletions

View file

@ -1278,7 +1278,29 @@ pictures, sounds, or video.")
version "/postgresql-" version ".tar.bz2"))
(sha256
(base32
"1kf0gcsrl5n25rjlvkh87aywmn28kbwvakm5c7j1qpr4j01y34za"))))))
"1kf0gcsrl5n25rjlvkh87aywmn28kbwvakm5c7j1qpr4j01y34za"))))
(arguments
(if (target-riscv64?)
`(,@(substitute-keyword-arguments (package-arguments postgresql-14)
((#:phases phases)
#~(modify-phases #$phases
(add-after 'unpack 'apply-riscv-spinlock-patch
;; The patch is applied in this custom phase and not via the
;; "origin" object above to avoid rebuilding a large number
;; of packages on other platforms.
(lambda* (#:key inputs #:allow-other-keys)
(let ((patch-file
#$(local-file
(search-patch
"postgresql-riscv-spinlocks.patch"))))
(invoke "patch" "-p1" "-i" patch-file))))))))
`(,@(package-arguments postgresql-14))))
(native-inputs
(if (target-riscv64?)
(list
(local-file (search-patch "postgresql-riscv-spinlocks.patch"))
patch)
'()))))
(define-public postgresql-11
(package