diff options
| author | Mattias Engdegård | 2019-05-20 17:38:03 +0200 |
|---|---|---|
| committer | Mattias Engdegård | 2019-05-20 17:38:03 +0200 |
| commit | c2cda3ff4025e8c27bdfc2a5279f3b635c8df260 (patch) | |
| tree | 20d58564a6aa5dcbd6fc1c9fd94e95738dceeeb7 /test/lisp | |
| parent | d3a0ddedba53b9e2c99274c8ec125d53f991da5d (diff) | |
| download | emacs-c2cda3ff4025e8c27bdfc2a5279f3b635c8df260.tar.gz emacs-c2cda3ff4025e8c27bdfc2a5279f3b635c8df260.zip | |
Revert "Allow zero-argument rx `or' and `seq' forms"
This reverts commit b552fc05c231ca6800330a318d3a74ddd0f5a13c.
It caused a bootstrapping failure which I have yet to resolve - sorry.
Diffstat (limited to 'test/lisp')
| -rw-r--r-- | test/lisp/emacs-lisp/rx-tests.el | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/test/lisp/emacs-lisp/rx-tests.el b/test/lisp/emacs-lisp/rx-tests.el index 6f392d616d1..4a5919edf02 100644 --- a/test/lisp/emacs-lisp/rx-tests.el +++ b/test/lisp/emacs-lisp/rx-tests.el | |||
| @@ -107,13 +107,7 @@ | |||
| 107 | "ab")) | 107 | "ab")) |
| 108 | (should (equal (and (string-match (rx (or "a" "ab" "abc")) s) | 108 | (should (equal (and (string-match (rx (or "a" "ab" "abc")) s) |
| 109 | (match-string 0 s)) | 109 | (match-string 0 s)) |
| 110 | "a"))) | 110 | "a")))) |
| 111 | ;; Test zero-argument `or'. | ||
| 112 | (should (equal (rx (or)) regexp-unmatchable))) | ||
| 113 | |||
| 114 | (ert-deftest rx-seq () | ||
| 115 | ;; Test zero-argument `seq'. | ||
| 116 | (should (equal (rx (seq)) ""))) | ||
| 117 | 111 | ||
| 118 | (provide 'rx-tests) | 112 | (provide 'rx-tests) |
| 119 | ;; rx-tests.el ends here. | 113 | ;; rx-tests.el ends here. |