Mercurial > emacs

annotate lisp/=bytecpat.el @ 23825:085b163b6115

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Vdos_unsupported_char_glyph): New variable. (syms_of_msdos): DEFVAR_LISP it. (IT_insert_glyphs, IT_delete_glyphs): New functions which abort Emacs. (internal_terminal_init): Set up insert_glyphs_hook and delete_glyphs_hook to call them. Explicitly set char_ins_del_ok to 0. (unibyte_display_via_language_environment): New variable. (syms_of_msdos): Devfar it. (IT_write_glyphs): Honor glyph aliasing via Vglyph_table. Encode the character codes of the glyphs according to the terminal_coding in effect.
author Eli Zaretskii <eliz@gnu.org>
date Sun, 06 Dec 1998 15:57:48 +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)))