From c06201a3cbe2f17669d37292a63ea532e4402b51 Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Thu, 27 Feb 2020 12:20:20 +0100
Subject: Emacs: optimise startup and GC

---
 user/emacs/.emacs.d/init.el | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'user')

diff --git a/user/emacs/.emacs.d/init.el b/user/emacs/.emacs.d/init.el
index 9818194f..7b85bb9b 100644
--- a/user/emacs/.emacs.d/init.el
+++ b/user/emacs/.emacs.d/init.el
@@ -1,4 +1,4 @@
-;;; init --- user init file
+;;; init --- user init file  -*- lexical-binding: t; -*-
 (setq inhibit-startup-echo-area-message "alan")
 (setq inhibit-startup-screen t
       initial-scratch-message ""
@@ -7,6 +7,12 @@
       evil-want-keybinding nil
       frame-inhibit-implied-resize t)
 
+(setq gc-cons-threshold most-positive-fixnum
+      gc-cons-percentage 0.6)
+(add-hook 'emacs-startup-hook (lambda ()
+                                (setq gc-cons-threshold (* 16 1024 1024)
+                                      gc-cons-percentage 0.1)))
+
 (package-initialize)
 
 (defun reload-user-init-file ()
-- 
cgit 1.4.1