Added startup time benchmark

3 years ago · 7c2af92b4b
1 changed files with 11 additions and 0 deletions
--- a/personal/preload/0-startup-time.el
+++ b/personal/preload/0-startup-time.el
@ -0,0 +1,11 @@
+;; Startup time
+(defun efs/display-startup-time ()
+  (message
+   "Emacs loaded in %s with %d garbage collections."
+   (format
+    "%.2f seconds"
+    (float-time
+     (time-subtract after-init-time before-init-time)))
+   gcs-done))
+
+(add-hook 'emacs-startup-hook #'efs/display-startup-time)