TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: emacs-no-x: Skip integrity test on armhf-linux.

Browse source 
* gnu/packages/emacs.scm (emacs-no-x)[#:phases]<validate-runpath>: Move
checks to GExpression expansion.  Add check against armhf-linux.
This commit is contained in:
Liliana Marie Prikler 2024-03-28 19:20:04 +01:00
parent 4c70f5242b
commit ce999ae3a2
No known key found for this signature in database
GPG key ID: 442A84B8C70E2F87
1 changed files with 13 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

22
gnu/packages/emacs.scm
View file

@ -384,15 +384,19 @@ (define (first-subdirectory/absolute directory)
(apply invoke "make" "trampolines" make-flags)))
(add-after 'validate-runpath 'validate-comp-integrity
(lambda* (#:key outputs #:allow-other-keys)
(if #$(%current-target-system)
(display "Cannot validate native-comp on cross builds.\n")
(invoke
(string-append (assoc-ref outputs "out") "/bin/emacs")
"--batch"
"--load"
#$(local-file
(search-auxiliary-file "emacs/comp-integrity.el"))
"-f" "ert-run-tests-batch-and-exit"))))))))
#$(cond
((%current-target-system)
#~(display "Cannot validate native-comp on cross builds.\n"))
((string=? (%current-system) "armhf-linux")
#~(display "Integrity test is broken on armhf.\n"))
(else
#~(invoke
(string-append (assoc-ref outputs "out") "/bin/emacs")
"--batch"
"--load"
#$(local-file
(search-auxiliary-file "emacs/comp-integrity.el"))
"-f" "ert-run-tests-batch-and-exit")))))))))
(inputs
(modify-inputs (package-inputs emacs-minimal)
(prepend gnutls