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