]> git.eshelyaron.com Git - emacs.git/commitdiff
Show a patch for Mule-UCS to make it byte-compiled old-branches/EMACS_21_1_RC
authorKenichi Handa <handa@m17n.org>
Wed, 14 Sep 2005 07:35:38 +0000 (07:35 +0000)
committerKenichi Handa <handa@m17n.org>
Wed, 14 Sep 2005 07:35:38 +0000 (07:35 +0000)
correctly.

etc/ChangeLog
etc/PROBLEMS

index c5233d118154ce2589ea095ba00e065b3ac35527..56ee938002f8cb0a671ae7d7dd8043f29e87f2d0 100644 (file)
@@ -1,3 +1,8 @@
+2005-09-14  Kenichi Handa  <handa@m17n.org>
+
+       * PROBLEMS: Show a patch for Mule-UCS to make it byte-compiled
+       correctly.
+
 2005-02-17  Francesco Potort\e,Al\e(B  <pot@gnu.org>
 
        * PROBLEMS: Document exec-shield Linux problem.  Do not mention
index f09dc2c6cb9dd48336a89276ee1b0730d7632b67..81536e262421667a603f709ec14dd4c02bd33707 100644 (file)
@@ -62,6 +62,36 @@ are various enhancements at <URL:ftp://dlpx1.dl.ac.uk/fx/emacs/Mule>
 which improve Emacs 21's handling of non-ASCII text, including dealing
 with CJK Unicode.
 
+** Mule-UCS compilation problem.
+
+Emacs of old versions and XEmacs byte-compile the form `(progn progn
+...)' the same way as `(progn ...)', but Emacs of version 21.3 and the
+later process that form just as interpreter does, that is, as `progn'
+variable reference.  Apply the following patch to Mule-UCS 0.84 to
+make it compiled by the latest Emacs.
+
+--- mucs-ccl.el        2 Sep 2005 00:42:23 -0000       1.1.1.1
++++ mucs-ccl.el        2 Sep 2005 01:31:51 -0000       1.3
+@@ -639,10 +639,14 @@
+       (mucs-notify-embedment 'mucs-ccl-required name)
+       (setq ccl-pgm-list (cdr ccl-pgm-list)))
+ ;   (message "MCCLREGFIN:%S" result)
+-    `(progn
+-       (setq mucs-ccl-facility-alist
+-           (quote ,mucs-ccl-facility-alist))
+-       ,@result)))
++    ;; The only way the function is used in this package is included
++    ;; in `mucs-package-definition-end-hook' value, where it must
++    ;; return (possibly empty) *list* of forms.  Do this.  Do not rely
++    ;; on byte compiler to remove extra `progn's in `(progn ...)' 
++    ;; form.
++    `((setq mucs-ccl-facility-alist
++          (quote ,mucs-ccl-facility-alist))
++      ,@result)))
+ ;;; Add hook for embedding translation informations to a package.
+ (add-hook 'mucs-package-definition-end-hook
+
 * Building Emacs with GCC 2.9x fails in the `src' directory.
 
 This may happen if you use a development version of GNU `cpp' from one