Add gcmh package to manage the valoue of gc-cons-threshold.

2022-06-09 04:14:23 -04:00 · 2022-06-09 04:14:23 -04:00 · b7873f48de
commit b7873f48de
parent 93bee419e8
2 changed files with 8 additions and 1 deletions
--- a/configs/base-extensions.el
+++ b/configs/base-extensions.el
@ -89,6 +89,13 @@
  :hook
  (after-init . global-git-gutter-mode))

+(use-package gcmh
+  :defer t
+  :straight t
+  :init
+  (setq gcmh-high-cons-threshold 100000000)
+  (gcmh-mode 1))
+
 ;; Highlight en los números.
 ;; (use-package highlight-numbers
 ;;   :defer t
--- a/init.el
+++ b/init.el
@ -31,7 +31,7 @@
 (add-hook 'emacs-startup-hook
          (lambda ()
            "Recover GC values after startup."
-            (setq gc-cons-threshold 100000000
+            (setq gc-cons-threshold 800000
                  gc-cons-percentage 0.1)))

 ;; Cargar configuraciones