emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/relint 16d41a55ce 05/10: Reactivate test that requires


From: ELPA Syncer
Subject: [elpa] externals/relint 16d41a55ce 05/10: Reactivate test that requires Emacs 27
Date: Sat, 28 Dec 2024 15:58:51 -0500 (EST)

branch: externals/relint
commit 16d41a55ce888969f688e075a0f0a7e81f4529dd
Author: Mattias EngdegÄrd <mattiase@acm.org>
Commit: Mattias EngdegÄrd <mattiase@acm.org>

    Reactivate test that requires Emacs 27
---
 test/4.elisp    | 12 ++++++------
 test/4.expected |  3 +++
 2 files changed, 9 insertions(+), 6 deletions(-)

diff --git a/test/4.elisp b/test/4.elisp
index be9038e558..8aedf02764 100644
--- a/test/4.elisp
+++ b/test/4.elisp
@@ -28,12 +28,12 @@
 ;; Test rx
 (defvar my-sub-rx '(one-or-more nonl))
 
-;;;(defun test-rx ()    ; Emacs 27-specific test; disable until it's out.
-;;;  (looking-at (concat (rx (eval my-sub-rx)
-;;;                          (literal (string ?a ?b))
-;;;                          (regexp (concat "c" "+"))
-;;;                          (regex (string ?d)))
-;;;                      "^")))
+(defun test-rx ()
+  (looking-at (concat (rx (eval my-sub-rx)
+                          (literal (string ?a ?b))
+                          (regexp (concat "c" "+"))
+                          (regex (string ?d)))
+                      "^")))
 
 ;; Test macro expansion
 (defmacro my-macro (x)
diff --git a/test/4.expected b/test/4.expected
index baf20ca36c..ce5baae7b9 100644
--- a/test/4.expected
+++ b/test/4.expected
@@ -37,6 +37,9 @@
 4.elisp:26:24-24: In call to looking-at: Unescaped literal `+' (pos 0)
   "+c"
    ^
+4.elisp:32:15: In call to looking-at: Unescaped literal `^' (pos 13)
+  ".+ab\\(?:c+\\)d^"
+   ...............^
 4.elisp:43:15: In call to looking-at: Unescaped literal `^' (pos 1)
   "a^"
    .^



reply via email to

[Prev in Thread] Current Thread [Next in Thread]