[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/relint 9eac0ae 4/5: Add tests for some uncovered rx war
From: |
Mattias Engdegård |
Subject: |
[elpa] externals/relint 9eac0ae 4/5: Add tests for some uncovered rx warning cases |
Date: |
Sun, 10 May 2020 10:37:57 -0400 (EDT) |
branch: externals/relint
commit 9eac0ae7e122c520443992c058a4fdd7458402a8
Author: Mattias Engdegård <address@hidden>
Commit: Mattias Engdegård <address@hidden>
Add tests for some uncovered rx warning cases
---
test/11.elisp | 7 ++++++-
test/11.expected | 7 +++++++
2 files changed, 13 insertions(+), 1 deletion(-)
diff --git a/test/11.elisp b/test/11.elisp
index 8c48a39..d629a56 100644
--- a/test/11.elisp
+++ b/test/11.elisp
@@ -26,4 +26,9 @@
;; No error here.
(rx (any "\000-\377" ?Ã¥) (any "\377" 255))
;; But here.
- (rx (any "\000-\377" "\177" "\240")))
+ (rx (any "\000-\377" "\177" "\240"))
+
+ (rx (any "a-z" ?m))
+ (rx (any "a-f" "\000-\377"))
+ (rx (any "\240-\277" "\000-\377"))
+ )
diff --git a/test/11.expected b/test/11.expected
index bb0788f..2c0eb6b 100644
--- a/test/11.expected
+++ b/test/11.expected
@@ -52,3 +52,10 @@
11.elisp:29:32: Character `\240' included in range `\200-\377' (pos 0)
"\240"
^
+11.elisp:31:18: Character `m' included in range `a-z'
+11.elisp:32:19: Range `\000-\377' overlaps previous `a-f' (pos 0)
+ "\000-\377"
+ ^
+11.elisp:33:25: Range `\000-\377' overlaps previous `\240-\277' (pos 0)
+ "\000-\377"
+ ^