Mercurial > emacs
comparison lisp/subr.el @ 63151:cb45242e9d82
(save-match-data): Add RESEAT arg `evaporate' to
set-match-data to free markers in match-data.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Wed, 08 Jun 2005 22:37:23 +0000 |
| parents | 0d5825b4e125 |
| children | bd20f5cf580f 173dee4e2611 |
comparison
equal
deleted
inserted
replaced
| 63150:571afd8b238a | 63151:cb45242e9d82 |
|---|---|
| 1968 (declare (indent 0) (debug t)) | 1968 (declare (indent 0) (debug t)) |
| 1969 (list 'let | 1969 (list 'let |
| 1970 '((save-match-data-internal (match-data))) | 1970 '((save-match-data-internal (match-data))) |
| 1971 (list 'unwind-protect | 1971 (list 'unwind-protect |
| 1972 (cons 'progn body) | 1972 (cons 'progn body) |
| 1973 '(set-match-data save-match-data-internal)))) | 1973 '(set-match-data save-match-data-internal 'evaporate)))) |
| 1974 | 1974 |
| 1975 (defun match-string (num &optional string) | 1975 (defun match-string (num &optional string) |
| 1976 "Return string of text matched by last search. | 1976 "Return string of text matched by last search. |
| 1977 NUM specifies which parenthesized expression in the last regexp. | 1977 NUM specifies which parenthesized expression in the last regexp. |
| 1978 Value is nil if NUMth pair didn't match, or there were less than NUM pairs. | 1978 Value is nil if NUMth pair didn't match, or there were less than NUM pairs. |