changeset 12726:835314018265

(byte-compile-insert-header): If compiling for vers 18, arrange to set current-load-list when loadingthe file.
author Richard M. Stallman <rms@gnu.org>
date Sun, 30 Jul 1995 19:03:26 +0000
parents 968d38f57f3a
children 7bf59a3ff303
files lisp/emacs-lisp/bytecomp.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/bytecomp.el	Sun Jul 30 10:10:35 1995 +0000
+++ b/lisp/emacs-lisp/bytecomp.el	Sun Jul 30 19:03:26 1995 +0000
@@ -1410,8 +1410,10 @@
 			 1 -1)
 	      (if byte-compile-dynamic-docstrings
 		  "' was compiled for Emacs 19.29 or later\"))\n\n"
-		"' was compiled for Emacs 19\"))\n\n")
-	      )))
+		"' was compiled for Emacs 19\"))\n\n"))
+    (insert "(or (boundp 'current-load-list) (setq current-load-list nil))\n"
+	    "\n")
+    ))
 
 
 (defun byte-compile-output-file-form (form)