Mercurial > emacs
annotate lisp/patcomp.el @ 102422:82f82b92314e
(CODING_ISO_CMP_STATUS): New macro.
(CODING_ISO_EXTSEGMENT_LEN, CODING_ISO_EMBEDDED_UTF_8): New macros.
(MAX_ANNOTATION_LENGTH): Defined to 5.
(ADD_COMPOSITION_DATA): New arg nbytes.
(emacs_mule_char): New arg cmp_status.
(DECODE_EMACS_MULE_COMPOSITION_CHAR): Delete it.
(DECODE_EMACS_MULE_COMPOSITION_RULE_20): New arg c.
(DECODE_EMACS_MULE_COMPOSITION_RULE_21): New arg c.
(DECODE_EMACS_MULE_21_COMPOSITION): Delete the arg c.
(DECODE_EMACS_MULE_20_RELATIVE_COMPOSITION): Likewise.
(DECODE_EMACS_MULE_20_RULEBASE_COMPOSITION): Likewise.
(DECODE_EMACS_MULE_COMPOSITION_START): New macro.
(EMACS_MULE_COMPOSITION_END): New macro.
(emacs_mule_finish_composition): New function.
(EMACS_MULE_MAYBE_FINISH_COMPOSITION): New macro.
(decode_coding_emacs_mule): Avoid long looking ahead while
handling composition.
(DECODE_COMPOSITION_RULE): Argument changed to rule and nbytes.
(ENCODE_COMPOSITION_RULE): New macro.
(finish_composition): New function.
(MAYBE_FINISH_COMPOSITION): Call finish_composition.
(DECODE_COMPOSITION_START): New implementation.
(DECODE_COMPOSITION_END): Likewise.
(STORE_COMPOSITION_RULE): New macro.
(decode_coding_iso_2022): Avoid long looking ahead while handling
composition, CTEXT extended segment, and embedded UTF-8.
(setup_coding_system): For a coding of type iso-2022, reset
CODING_ISO_EXTSEGMENT_LEN (coding) and
CODING_ISO_EMBEDDED_UTF_8 (coding).
(get_translation): Delete arguments last_block, from_nchars,
to_nchars. Callers changed.
(produce_chars): Don't modify charbuf. Adjusted for the change of
get_translation.
(produce_composition): Adjusted for the new annotation sequence.
(handle_composition_annotation): Likewise.
(consume_chars): Adjusted for the change of get_translation.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Fri, 06 Mar 2009 07:51:52 +0000 |
parents | 1e3a407766b9 |
children | ef719132ddfa |
rev | line source |
---|---|
47726
33d53d287ee4
Add "no-byte-compile: t" in first line.
Juanma Barranquero <lekktu@gmail.com>
parents:
38414
diff
changeset
|
1 ;;; patcomp.el --- used by patch files to update Emacs releases -*- no-byte-compile: t -*- |
10015 | 2 |
38414
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
3 ;; This file is part of GNU Emacs. |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
4 |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
5 ;;; Commentary: |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
6 |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
7 ;;; Code: |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
8 |
10015 | 9 (defun batch-byte-recompile-emacs () |
10 "Recompile the Emacs `lisp' directory. | |
11 This is used after installing the patches for a new version." | |
12 (let ((load-path (list (expand-file-name "lisp")))) | |
13 (byte-recompile-directory "lisp"))) | |
10016
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
14 |
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
15 (defun batch-byte-compile-emacs () |
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
16 "Compile new files installed in the Emacs `lisp' directory. |
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
17 This is used after installing the patches for a new version. |
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
18 It uses the command line arguments to specify the files to compile." |
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
19 (let ((load-path (list (expand-file-name "lisp")))) |
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
20 (batch-byte-compile))) |
38414
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
21 |
93975
1e3a407766b9
Fix up comment convention on the arch-tag lines.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
52401
diff
changeset
|
22 ;; arch-tag: cb299b78-1d6c-4c02-945b-12fa2e856d6f |
38414
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
23 ;;; patcomp.el ends here |