[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#68484] [PATCH v2] gnu: guile-fibers: Disable failing tests on aarch
From: |
Roman Scherer |
Subject: |
[bug#68484] [PATCH v2] gnu: guile-fibers: Disable failing tests on aarch64. |
Date: |
Wed, 17 Jan 2024 20:48:36 +0100 |
* gnu/packages/guile-xyz.scm (guile-fibers): Disable failing tests on aarch64.
Change-Id: Id05b516a659f641cc7ef01efdaf6cd1f2c735800
---
gnu/packages/guile-xyz.scm | 25 +++++++++++++++++++------
1 file changed, 19 insertions(+), 6 deletions(-)
diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm
index 77be632cc3..1db0984a04 100644
--- a/gnu/packages/guile-xyz.scm
+++ b/gnu/packages/guile-xyz.scm
@@ -823,17 +823,30 @@ (define-public guile-fibers
(list #:make-flags
#~(list "GUILE_AUTO_COMPILE=0")
#:phases
- (if (target-x86-64?)
- #~%standard-phases
- #~(modify-phases %standard-phases
- (add-before 'check 'disable-some-tests
- (lambda _
+ #~(modify-phases %standard-phases
+ (add-before 'check 'disable-some-tests
+ (lambda _
+ (unless #$(target-x86-64?)
;; This test can take more than an hour on some systems.
(substitute* "tests/basic.scm"
((".*spawn-fiber loop-to-1e4.*") ""))
+
;; These tests can take more than an hour and/or segfault.
(substitute* "Makefile"
- (("tests/speedup.scm") ""))))))))
+ (("tests/speedup.scm") "")))
+
+ (when #$(target-aarch64?)
+ ;; This test has issues on aarch64 systems. It passes on
+ ;; an Apple M1, but takes a very long time on a Hetzner
+ ;; aarch64 VM.
+ (substitute* "tests/basic.scm"
+ ((".*spawn-fiber-chain 5000000.*") ""))
+
+ ;; This test has issues on aarch64 systems. It passes on
+ ;; an Apple M1, but raises exceptions on a Hetzner
+ ;; aarch64 VM.
+ (substitute* "tests/channels.scm"
+ ((".*assert-run-fibers-terminates .*pingpong.*")
""))))))))
(native-inputs
(list texinfo pkg-config autoconf-2.71 automake libtool
guile-3.0 ;for 'guild compile
base-commit: 162d6a2fdd6af13272967c77347a54934ecb45e6
--
2.41.0