Mercurial > hg > xemacs-beta
comparison tests/automated/regexp-tests.el @ 5680:8a2ac78cb97d
Pre-emptively update any dirty mirror syntax table before searching
src/ChangeLog addition:
2012-09-02 Aidan Kehoe <kehoea@parhasard.net>
* regex.c (re_search_2):
* regex.c (re_match_2):
If the mirror syntax table is dirty, update it before the search,
preventing a malloc() inside the search code, something which
isn't allowed. Thank you Henry Thompson!
tests/ChangeLog addition:
2012-09-02 Aidan Kehoe <kehoea@parhasard.net>
* automated/regexp-tests.el:
Make sure we can search for character ranges successfully when the
syntax table is dirty.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Sun, 02 Sep 2012 17:36:47 +0100 |
parents | 3df910176b6a |
children |
comparison
equal
deleted
inserted
replaced
5679:a81a739181dc | 5680:8a2ac78cb97d |
---|---|
1107 (decode-char 'ucs #x0686) ;; ARABIC LETTER TCHEH | 1107 (decode-char 'ucs #x0686) ;; ARABIC LETTER TCHEH |
1108 (decode-char 'ucs #x20af) ;; DRACHMA SIGN | 1108 (decode-char 'ucs #x20af) ;; DRACHMA SIGN |
1109 (decode-char 'ucs #x2116) ;; NUMERO SIGN | 1109 (decode-char 'ucs #x2116) ;; NUMERO SIGN |
1110 (decode-char 'ucs #x5357))) ;; kDefinition south; southern part; southward | 1110 (decode-char 'ucs #x5357))) ;; kDefinition south; southern part; southward |
1111 | 1111 |
1112 (with-temp-buffer | |
1113 (insert "hi there") | |
1114 (goto-char 1) | |
1115 (set-syntax-table (copy-syntax-table)) | |
1116 (modify-syntax-entry 'ascii "<") | |
1117 (Assert (null (re-search-forward "[[:alnum:]]" nil t)) | |
1118 "checking that a bug with dirty syntax table caches has been fixed")) | |
1119 |