* lisp/treesit.el (treesit-max-buffer-size): Enlarge value.

diff --git a/lisp/treesit.el b/lisp/treesit.el
index b81396fc2299a268dbbd6f16d5d5f6124ed6c5eb..8f5d28f656ca2e58ec569ebf62d20f0bc33c5e5a 100644 (file)
--- a/lisp/treesit.el
+++ b/lisp/treesit.el
@@ -95,7 +95,12 @@ indent, imenu, etc."
   :group 'tools
   :version "29.1")
 
-(defcustom treesit-max-buffer-size (* 4 1024 1024)
+(defcustom treesit-max-buffer-size
+  (let ((mb (* 1024 1024)))
+    ;; 40MB for 64-bit systems, 15 for 32-bit.
+    (if (> most-positive-fixnum (* 4 1024 mb))
+        (* 40 mb)
+      (* 15 mb)))
   "Maximum buffer size for enabling tree-sitter parsing (in bytes)."
   :type 'integer
   :version "29.1")