lilyp pushed a commit to branch emacs-team
in repository guix.
commit 86a8476852366994cc4251eb097f5e02494561e7
Author: Nicolas Graves <[email protected]>
AuthorDate: Thu Mar 20 11:08:14 2025 +0100
gnu: emacs-pcre2el: Skip failing tests.
* gnu/packages/emacs-xyz.scm (emacs-pcre2el): Skip failing tests.
[arguments]: Add {test-command} and phase 'skip-failing-tests.
[native-inputs]: Add emacs-ert-runner.
Signed-off-by: Liliana Marie Prikler <[email protected]>
---
gnu/packages/emacs-xyz.scm | 14 ++++++++++++++
1 file changed, 14 insertions(+)
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index a6b071dac8..44e6cb8866 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -30723,6 +30723,20 @@ Tramp's own encoding methods for moving data between
systems.")
(base32
"0h73d9f1zj74vjir2kiq4s2g5rai7b59z7da20kh862xnldfcxsx"))))
(build-system emacs-build-system)
+ (arguments
+ (list
+ #:test-command #~(list "ert-runner" "-L" "." "pcre2el-tests.el")
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-before 'check 'skip-failing-tests
+ (lambda _
+ (let ((unexpected (list "017" "018" "125" "584" "585" "601"
"690")))
+ (substitute* "pcre2el-tests.el"
+ (((string-append "\\(ert-deftest rxt-pcre-test-00("
+ (string-join unexpected "|")
+ ") .*") all)
+ (string-append all "(skip-unless nil)")))))))))
+ (native-inputs (list emacs-ert-runner))
(home-page "https://github.com/joddie/pcre2el";)
(synopsis "Convert between PCRE, Emacs and rx regexp syntax")
(description "@code{pcre2el} or @code{rxt} (RegeXp Translator or RegeXp
