Comment change.

diff --git a/src/eval.c b/src/eval.c
index 3465ea785a7e914fede6dd7f1a6ad5bad9f5c646..147e8bef2dd56d300783fc98bbd2aa19b42ebb9a 100644 (file)
--- a/src/eval.c
+++ b/src/eval.c
@@ -1906,6 +1906,8 @@ do_autoload (fundef, funname)
   Lisp_Object fun, queue, first, second;
   struct gcpro gcpro1, gcpro2, gcpro3;
 
+  /* This is to make sure that loadup.el gives a clear picture
+     of what files are preloaded and when.  */
   if (! NILP (Vpurify_flag))
     error ("Attempt to autoload %s while preparing to dump",
           XSYMBOL (funname)->name->data);

diff --git a/src/fns.c b/src/fns.c
index 6a54ececb8d7497ce4117856123c701abb93da46..6d168f482404bf439af3d435154ab380cb86cf95 100644 (file)
--- a/src/fns.c
+++ b/src/fns.c
@@ -3251,6 +3251,8 @@ The normal messages at start and end of loading FILENAME are suppressed.  */)
       int count = specpdl_ptr - specpdl;
       int nesting = 0;
 
+      /* This is to make sure that loadup.el gives a clear picture
+        of what files are preloaded and when.  */
       if (! NILP (Vpurify_flag))
        error ("(require %s) while preparing to dump",
               XSYMBOL (feature)->name->data);