# HG changeset patch # User Chong Yidong # Date 1223309816 0 # Node ID bc9970afd5bea993e15e9d773c0285a75acfd559 # Parent a97852c2d56038f94953975db03e82bc06e0518f (Vbefore_init_time, Vafter_init_time): Moved from startup.el. diff -r a97852c2d560 -r bc9970afd5be src/emacs.c --- a/src/emacs.c Mon Oct 06 16:16:43 2008 +0000 +++ b/src/emacs.c Mon Oct 06 16:16:56 2008 +0000 @@ -131,6 +131,9 @@ nil means get them only from PATH_LOADSEARCH. */ Lisp_Object Vinstallation_directory; +/* The values of `current-time' before and after Emacs initialization. */ +Lisp_Object Vbefore_init_time, Vafter_init_time; + /* Hook run by `kill-emacs' before it does really anything. */ Lisp_Object Vkill_emacs_hook; @@ -2497,6 +2500,15 @@ DEFVAR_LISP ("previous-system-time-locale", &Vprevious_system_time_locale, doc: /* Most recently used system locale for time. */); Vprevious_system_time_locale = Qnil; + + DEFVAR_LISP ("before-init-time", &Vbefore_init_time, + doc: /* Value of `current-time' before Emacs begins initialization. */); + Vbefore_init_time = Qnil; + + DEFVAR_LISP ("after-init-time", &Vafter_init_time, + doc: /* Value of `current-time' after loading the init files. +This is nil during initialization. */); + Vafter_init_time = Qnil; } /* arch-tag: 7bfd356a-c720-4612-8ab6-aa4222931c2e