annotate lisp/=bytecpat.el @ 14190:395b22713872

(ps-do-despool): On MS-DOS, allow both the usual and the alternative printing methods.
author Richard M. Stallman <rms@gnu.org>
date Mon, 15 Jan 1996 22:50:35 +0000
parents 84acc3adcd63
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
13337
84acc3adcd63 Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 13335
diff changeset
1 ;;; bytecpat.el --- do recompilation for Emacs patch files.
13335
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
2 ;;; This function is used by the patch files to update Emacs releases.
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
3
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
4 (defun batch-byte-recompile-emacs ()
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
5 "Recompile the Emacs `lisp' directory.
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
6 This is used after installing the patches for a new version."
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
7 (let ((load-path (list (expand-file-name "lisp"))))
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
8 (byte-recompile-directory "lisp")))
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
9
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
10 (defun batch-byte-compile-emacs ()
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
11 "Compile new files installed in the Emacs `lisp' directory.
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
12 This is used after installing the patches for a new version.
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
13 It uses the command line arguments to specify the files to compile."
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
14 (let ((load-path (list (expand-file-name "lisp"))))
258b67997ae6 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
15 (batch-byte-compile)))