diff options
Diffstat (limited to 'tools/editors/emacs/tests/re.el')
| -rw-r--r-- | tools/editors/emacs/tests/re.el | 15 |
1 files changed, 10 insertions, 5 deletions
diff --git a/tools/editors/emacs/tests/re.el b/tools/editors/emacs/tests/re.el index fa86d4f09..946801892 100644 --- a/tools/editors/emacs/tests/re.el +++ b/tools/editors/emacs/tests/re.el @@ -634,7 +634,8 @@ and the numbered matches are compared." (cons "\\[^|\n]\\+" "\\(?:\\S \\|\\S \\(?:[^|\\\n]\\|\\\\.\\)\\{0,1000\\}[^ |\\]\\)" ) ;; Symbol name more sophisticated (cons (regexp-quote "\\(\\sw\\|\\s_\\)+") - "\\(?:\\sw+\\(?:\\s_\\sw+\\)*\\)") ;; New syntax for symbols + "\\(?:\\sw+\\(?:[-+.:_]\\sw+\\)*\\)") ;; New syntax for + ;; symbols (cons "\\\\(\\[\t " "\\(?:[\t ") ;; Make a group shy )) (should (re-equal-matches @@ -762,9 +763,11 @@ and the numbered matches are compared." (cons "\\\\(:" "\\(?::") ;; Make a group shy (cons "\\\\(:" "\\(?::") ;; Make a group shy (cons (regexp-quote "\\(\\sw\\|\\s_\\)+") - "\\(?:\\sw+\\(?:\\s_\\sw+\\)*\\)") ;; New syntax for symbols + "\\(?:\\sw+\\(?:[-+.:_]\\sw+\\)*\\)") ;; New syntax for + ;; symbols (cons (regexp-quote "\\(\\sw\\|\\s_\\)+") - "\\(?:\\sw+\\(?:\\s_\\sw+\\)*\\)") ;; New syntax for symbols + "\\(?:\\sw+\\(?:[-+.:_]\\sw+\\)*\\)") ;; New syntax for + ;; symbols (cons (regexp-quote "\\\\]") "\\]") ;; Remove superfluous quote (cons (regexp-quote "\\|$") "") (cons (regexp-quote "\\([\t ]") @@ -823,9 +826,11 @@ and the numbered matches are compared." (cons 2 1)) (cons "^\\\\(" "\\(?:") ;; Make a group shy (cons (regexp-quote "\\(\\sw\\|\\s_\\)+") - "\\(?:\\sw+\\(?:\\s_\\sw+\\)*\\)") ;; New syntax for symbols + "\\(?:\\sw+\\(?:[-+.:_]\\sw+\\)*\\)") ;; New syntax for + ;; symbols (cons (regexp-quote "\\(\\sw\\|\\s_\\)+") - "\\(?:\\sw+\\(?:\\s_\\sw+\\)*\\)") ;; New syntax for symbols + "\\(?:\\sw+\\(?:[-+.:_]\\sw+\\)*\\)") ;; New syntax for + ;; symbols (cons (regexp-quote "\\|$") "") (cons (regexp-quote "\\([\t ]") "\\(?:$\\|[\t ]") ;; Move "$" in regex and make a group shy |