From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Kenichi Handa Newsgroups: gmane.emacs.devel Subject: Re: Mule-UCS 0.84 (KOUGETSUDAI) release. Date: Thu, 5 Dec 2002 17:15:27 +0900 (JST) Sender: emacs-devel-admin@gnu.org Message-ID: <200212050815.RAA19189@etlken.m17n.org> References: <20021104.103826.71116326.05@tats.iris.ne.jp> <20021105.202038.18871060.05@tats.iris.ne.jp> <20021129.215347.74727519.05@tats.iris.ne.jp> <20021202.175121.98551706.wl@gnu.org> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 (generated by SEMI 1.14.3 - "Ushinoya") Content-Type: text/plain; charset=US-ASCII X-Trace: main.gmane.org 1039076144 23800 80.91.224.249 (5 Dec 2002 08:15:44 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Thu, 5 Dec 2002 08:15:44 +0000 (UTC) Cc: tats@vega.ocn.ne.jp, emacs-devel@gnu.org, himi@meadowy.org Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 18JrAc-0006Bk-00 for ; Thu, 05 Dec 2002 09:15:42 +0100 Original-Received: from monty-python.gnu.org ([199.232.76.173]) by quimby.gnus.org with esmtp (Exim 3.12 #1 (Debian)) id 18JrKz-0008FW-00 for ; Thu, 05 Dec 2002 09:26:26 +0100 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.10.13) id 18JrB2-0004LR-00; Thu, 05 Dec 2002 03:16:08 -0500 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.10.13) id 18JrAX-0003Se-00 for emacs-devel@gnu.org; Thu, 05 Dec 2002 03:15:37 -0500 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.10.13) id 18JrAR-0003SH-00 for emacs-devel@gnu.org; Thu, 05 Dec 2002 03:15:35 -0500 Original-Received: from tsukuba.m17n.org ([192.47.44.130]) by monty-python.gnu.org with esmtp (Exim 4.10.13) id 18JrAQ-0003S8-00 for emacs-devel@gnu.org; Thu, 05 Dec 2002 03:15:31 -0500 Original-Received: from fs.m17n.org (fs.m17n.org [192.47.44.2]) by tsukuba.m17n.org (8.11.6/3.7W-20010518204228) with ESMTP id gB58FRk09253; Thu, 5 Dec 2002 17:15:27 +0900 (JST) (envelope-from handa@m17n.org) Original-Received: from etlken.m17n.org (etlken.m17n.org [192.47.44.125]) by fs.m17n.org (8.11.3/3.7W-20010823150639) with ESMTP id gB58FRR02704; Thu, 5 Dec 2002 17:15:27 +0900 (JST) Original-Received: (from handa@localhost) by etlken.m17n.org (8.8.8+Sun/3.7W-2001040620) id RAA19189; Thu, 5 Dec 2002 17:15:27 +0900 (JST) Original-To: mule@m17n.org In-reply-to: <20021202.175121.98551706.wl@gnu.org> (message from Werner LEMBERG on Mon, 02 Dec 2002 17:51:21 +0100 (CET)) User-Agent: SEMI/1.14.3 (Ushinoya) FLIM/1.14.2 (Yagi-Nishiguchi) APEL/10.2 Emacs/21.2.92 (sparc-sun-solaris2.6) MULE/5.0 (SAKAKI) Errors-To: emacs-devel-admin@gnu.org X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.0.11 Precedence: bulk List-Help: List-Post: List-Subscribe: , List-Id: Emacs development discussions. List-Unsubscribe: , List-Archive: Xref: main.gmane.org gmane.emacs.devel:9873 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:9873 In article <20021202.175121.98551706.wl@gnu.org>, Werner LEMBERG writes: > Compiling mule-ucs-0.84 (available from m17n.org) with this patch > http://tats.iris.ne.jp/mule-ucs/mule-ucs-0.84+tats20021129.diff.gz > using Emacs CVS 2002-11-20 fails. I get the following suspicious error > message: > In toplevel form: > un-define.el:859:30:Warning: reference to free variable progn > [...] > In toplevel form: > un-supple.el:29:1:Error: Symbol's value as variable is void: progn By inspecting several results of macroexpand, I found mucs-embed-program-with-hooks results in a form: (progn progn ...) So, please try the attached patch? > Using Emacs 20.7.1 the compilation is successful, so I suspect a bug > in the byte compiler. Any solution? ?!?!? I have no idea why Mule-UCS can be compiled by 20.7 and 21.2 without error. Himi-san, could you please investigate it? --- Ken'ichi HANDA handa@m17n.org *** mucs.el 2002/12/05 07:53:41 1.1 --- mucs.el 2002/12/05 07:55:59 *************** *** 196,203 **** (funcall (car hookval)) result) hookval (cdr hookval))) ! (cons 'progn ! result))) (defmacro mucs-define-package (package &rest form) "Enclose a unit of package with this. --- 196,202 ---- (funcall (car hookval)) result) hookval (cdr hookval))) ! result)) (defmacro mucs-define-package (package &rest form) "Enclose a unit of package with this.