feature/tree-sitter ca87a0133d 1/5: * lisp/treesit.el (treesit-max-buffer-size): Enlarge value.

[Yuan Fu]

branch: feature/tree-sitter
commit ca87a0133d893fd8cde00a9738d4c3b4dafe155f
Author: Yuan Fu <casouri@gmail.com>
Commit: Yuan Fu <casouri@gmail.com>

    * lisp/treesit.el (treesit-max-buffer-size): Enlarge value.
---
 lisp/treesit.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/lisp/treesit.el b/lisp/treesit.el
index b81396fc22..8f5d28f656 100644
--- 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")