diff options
Diffstat (limited to 'lisp/subr.el')
| -rw-r--r-- | lisp/subr.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index f43f84fd7d7..113ba4239e0 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -2032,6 +2032,8 @@ The value returned is the value of the last form in BODY." '((save-match-data-internal (match-data))) (list 'unwind-protect (cons 'progn body) + ;; It is safe to free (evaporate) markers immediately here, + ;; as Lisp programs should not copy from save-match-data-internal. '(set-match-data save-match-data-internal 'evaporate)))) (defun match-string (num &optional string) |