From mboxrd@z Thu Jan  1 00:00:00 1970
Path: main.gmane.org!not-for-mail
From: Richard Stallman <rms@gnu.org>
Newsgroups: gmane.emacs.devel
Subject: Re: cc-vars.el
Date: Wed, 20 Nov 2002 16:14:03 -0500
Sender: emacs-devel-admin@gnu.org
Message-ID: <E18EcAd-0007Zw-00@fencepost.gnu.org>
References: <E18CrrF-0005AT-00@fencepost.gnu.org>
	<rzqwunberel.fsf@albion.dl.ac.uk>
	<200211180057.JAA24537@etlken.m17n.org>
	<rzqr8di8xlx.fsf@albion.dl.ac.uk> <5bbs4m8qz9.fsf@lister.roxen.com>
	<buod6p2xrol.fsf@mcspd15.ucom.lsi.nec.co.jp> <rzqlm3p7axl.fsf@albion.dl.ac.uk>
Reply-To: rms@gnu.org
NNTP-Posting-Host: main.gmane.org
X-Trace: main.gmane.org 1037826881 28426 80.91.224.249 (20 Nov 2002 21:14:41 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Wed, 20 Nov 2002 21:14:41 +0000 (UTC)
Cc: miles@gnu.org, mast@lysator.liu.se, handa@m17n.org,
	emacs-devel@gnu.org
Return-path: <emacs-devel-admin@gnu.org>
Original-Received: from quimby.gnus.org ([80.91.224.244])
	by main.gmane.org with esmtp (Exim 3.35 #1 (Debian))
	id 18EcBB-0007O8-00
	for <emacs-devel@main.gmane.org>; Wed, 20 Nov 2002 22:14:37 +0100
Original-Received: from monty-python.gnu.org ([199.232.76.173])
	by quimby.gnus.org with esmtp (Exim 3.12 #1 (Debian))
	id 18EcEY-0001Nl-00
	for <emacs-devel@quimby.gnus.org>; Wed, 20 Nov 2002 22:18:06 +0100
Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org)
	by monty-python.gnu.org with esmtp (Exim 4.10)
	id 18EcC6-0005Vf-00; Wed, 20 Nov 2002 16:15:34 -0500
Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.10)
	id 18EcAl-0004aj-00
	for emacs-devel@gnu.org; Wed, 20 Nov 2002 16:14:11 -0500
Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.10)
	id 18EcAd-0004Tv-00
	for emacs-devel@gnu.org; Wed, 20 Nov 2002 16:14:08 -0500
Original-Received: from fencepost.gnu.org ([199.232.76.164])
	by monty-python.gnu.org with esmtp (Exim 4.10)
	id 18EcAd-0004Tg-00
	for emacs-devel@gnu.org; Wed, 20 Nov 2002 16:14:03 -0500
Original-Received: from rms by fencepost.gnu.org with local (Exim 4.10)
	id 18EcAd-0007Zw-00; Wed, 20 Nov 2002 16:14:03 -0500
Original-To: d.love@dl.ac.uk
In-reply-to: <rzqlm3p7axl.fsf@albion.dl.ac.uk> (message from Dave Love on 19
	Nov 2002 16:59:18 +0000)
Errors-To: emacs-devel-admin@gnu.org
X-BeenThere: emacs-devel@gnu.org
X-Mailman-Version: 2.0.11
Precedence: bulk
List-Help: <mailto:emacs-devel-request@gnu.org?subject=help>
List-Post: <mailto:emacs-devel@gnu.org>
List-Subscribe: <http://mail.gnu.org/mailman/listinfo/emacs-devel>,
	<mailto:emacs-devel-request@gnu.org?subject=subscribe>
List-Id: Emacs development discussions. <emacs-devel.gnu.org>
List-Unsubscribe: <http://mail.gnu.org/mailman/listinfo/emacs-devel>,
	<mailto:emacs-devel-request@gnu.org?subject=unsubscribe>
List-Archive: <http://mail.gnu.org/pipermail/emacs-devel/>
Xref: main.gmane.org gmane.emacs.devel:9575
X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:9575

    ! 		(fbound (byte-compile-form (nth 2 form) for-effect)
    ! 			(setq byte-compile-unresolved-functions
    ! 			      (delq (assq fbound
    ! 					  byte-compile-unresolved-functions)
    ! 				    byte-compile-unresolved-functions)))

If the function was in the list before, it should not
be removed now.  Something like

  (let ((old byte-compile-unresolved-functions))
    (byte-compile-form (nth 2 form) for-effect)
    (unless (assq fbound old)
      (delq (assq fbound
		  byte-compile-unresolved-functions))))