From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/14576 Path: main.gmane.org!not-for-mail From: Hallvard B Furuseth Newsgroups: gmane.emacs.gnus.general Subject: Re: Why can't `gnus-draft-setup' be bytecompiled? Date: 14 Mar 1998 03:29:42 +0100 Sender: owner-ding@hpc.uh.edu Message-ID: References: NNTP-Posting-Host: coloc-standby.netfonds.no X-Trace: main.gmane.org 1035153746 17000 80.91.224.250 (20 Oct 2002 22:42:26 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 22:42:26 +0000 (UTC) Return-Path: Original-Received: from xemacs.org (xemacs.cs.uiuc.edu [128.174.252.16]) by altair.xemacs.org (8.8.8/8.8.8) with ESMTP id SAA07339 for ; Fri, 13 Mar 1998 18:36:04 -0800 Original-Received: from gizmo.hpc.uh.edu (gizmo.hpc.uh.edu [129.7.102.31]) by xemacs.org (8.8.5/8.8.5) with ESMTP id UAA08199 for ; Fri, 13 Mar 1998 20:30:50 -0600 (CST) Original-Received: from sina.hpc.uh.edu (sina.hpc.uh.edu [129.7.3.5]) by gizmo.hpc.uh.edu (8.7.6/8.7.3) with ESMTP id VAN10971; Fri, 13 Mar 1998 21:05:58 -0600 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Fri, 13 Mar 1998 20:30:05 -0600 (CST) Original-Received: from claymore.vcinet.com (claymore.vcinet.com [208.205.12.23]) by sina.hpc.uh.edu (8.7.3/8.7.3) with SMTP id UAA20432 for ; Fri, 13 Mar 1998 20:29:58 -0600 (CST) Original-Received: (qmail 7943 invoked by uid 504); 14 Mar 1998 02:29:48 -0000 Original-Received: (qmail 7940 invoked from network); 14 Mar 1998 02:29:47 -0000 Original-Received: from pat.uio.no (6089@129.240.130.16) by claymore.vcinet.com with SMTP; 14 Mar 1998 02:29:47 -0000 Original-Received: from bombur2.uio.no (actually bombur2.uio.no [129.240.200.72]) by pat.uio.no with SMTP (PP); Sat, 14 Mar 1998 03:29:44 +0100 Original-Received: by bombur2.uio.no ; Sat, 14 Mar 1998 03:29:43 +0100 (MET) Original-To: ding@gnus.org In-Reply-To: SL Baur's message of "09 Mar 1998 15:01:57 -0800" Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:14576 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:14576 SL Baur writes: > `gnus-draft-setup' is wrapped in a progn and has the annotation: > > ;;;!!!If this is byte-compiled, it fails miserably. > ;;;!!!I have no idea why. It *is* bytecompiled in emacs19. To leave it uncompiled, gnus-draft.el would need (dont-compile (defun gnus-draft-setup ...)) or, if you prefer, (eval '(defun gnus-draft-setup ...)) It was the emacs18 compiler which only compiled top-level defuns. Looking at this, I noticed a bug in gnus-setup-message: (defmacro gnus-setup-message (config &rest forms) ... `(let (...) ... (set (make-local-variable 'gnus-message-group-art) (cons ,gnus-newsgroup-name ,article)) ^^^^^^^^^^^^^^^^^^^^ This expands to the value which gnus-newsgroup-name has *at compile time*. That's normally nil, unless you byte-compile inside emacs. Normally you should only use `,' in front of the macro arguments (or values computed from the macro arguments). There are several other occurrences of ",gnus-*" in gnus-msg.el. And other places, as seen with egrep ',@* *(gnus|nn[a-z0-9]*)-' *.el -- Hallvard