annotate lisp/=bytecpat.el @ 31897:a292cc13911a
(GC_CHECK_STRING_BYTES): Temporarily define, for bug
hunting.
(struct sdata) [GC_CHECK_STRING_BYTES]: Always record the string's
size in the sdata structure.
(SDATA_NBYTES, SDATA_DATA): New macros.
(SDATA_OF_STRING, SDATA_SIZE) [GC_CHECK_STRING_BYTES]: Define
differently for the different layout of the sdata structure.
(allocate_string_data) [GC_CHECK_STRING_BYTES]: Record string size
in sdata.
(sweep_strings, compact_small_strings) [GC_CHECK_STRING_BYTES]:
Check that size recorded in the string size and size recorded in
the sdata structure agree.
author |
Gerd Moellmann <gerd@gnu.org> |
date |
Tue, 26 Sep 2000 11:11:51 +0000 |
parents |
84acc3adcd63 |
children |
|
rev |
line source |
13337
|
1 ;;; bytecpat.el --- do recompilation for Emacs patch files.
|
13335
|
2 ;;; This function is used by the patch files to update Emacs releases.
|
|
3
|
|
4 (defun batch-byte-recompile-emacs ()
|
|
5 "Recompile the Emacs `lisp' directory.
|
|
6 This is used after installing the patches for a new version."
|
|
7 (let ((load-path (list (expand-file-name "lisp"))))
|
|
8 (byte-recompile-directory "lisp")))
|
|
9
|
|
10 (defun batch-byte-compile-emacs ()
|
|
11 "Compile new files installed in the Emacs `lisp' directory.
|
|
12 This is used after installing the patches for a new version.
|
|
13 It uses the command line arguments to specify the files to compile."
|
|
14 (let ((load-path (list (expand-file-name "lisp"))))
|
|
15 (batch-byte-compile)))
|