branch: externals/relint commit 9eac0ae7e122c520443992c058a4fdd7458402a8 Author: Mattias Engdegård <matti...@acm.org> Commit: Mattias Engdegård <matti...@acm.org>
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" + ^