lilyp pushed a commit to branch emacs-team
in repository guix.

commit 0477adb8c936cc6a9c52ed3e14b494f0d3d06a2c
Author: Nicolas Graves <ngra...@ngraves.fr>
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 <liliana.prik...@gmail.com>
---
 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 8f8d74b6e0..5355400c92 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -31173,6 +31173,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

Reply via email to