branch: externals/auctex
commit 188e4b1617dabc896bfc407be3ba538ea8dcabc6
Author: Mosè Giordano <m...@gnu.org>
Commit: Mosè Giordano <m...@gnu.org>
Temporarily bind gc-cons-threshold in time-consuming task
* tex.el (TeX-search-files-by-type): Bind `gc-cons-threshold' to
10000000 during the search, to reduce number of garbage collections
during the task.
---
tex.el | 3 ++-
1 files changed, 2 insertions(+), 1 deletions(-)
diff --git a/tex.el b/tex.el
index c87e539..e22898f 100644
--- a/tex.el
+++ b/tex.el
@@ -4484,7 +4484,8 @@ in the global directories only and nil in both.
If optional argument NODIR is non-nil, remove directory part.
If optional argument STRIP is non-nil, remove file extension."
- (let* ((spec (assq filetype TeX-search-files-type-alist))
+ (let* ((gc-cons-threshold 10000000)
+ (spec (assq filetype TeX-search-files-type-alist))
(kpse-var (nth 1 spec))
(rawdirs (nth 2 spec))
(exts (nth 3 spec))
