Path: news.cs.au.dk!news.net.uni-c.dk!howland.erols.net!news-feed.ifi.uio.no!ifi.uio.no!not-for-mail
From: Alf-Ivar Holm <alfh@ifi.uio.no>
Newsgroups: comp.lang.beta
Subject: Re: beta mode for emacs
Date: 04 Mar 1999 21:17:31 +0100
Organization: The Department of Informatics, University of Oslo, Norway
Lines: 37
Message-ID: <wogww0xc8mc.fsf@naglfar.ifi.uio.no>
References: <19990303123948.25049.qmail@noatun.mjolner.dk> <y4tak8wy9yv7.fsf@nobox.Eng.Sun.COM> <36DDBA7E.2D596B1@uni-mainz.de> <y4tad82q9hss.fsf@nobox.Eng.Sun.COM>
NNTP-Posting-Host: naglfar.ifi.uio.no
Mime-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Trace: mimir.ifi.uio.no 920578652 9945 129.240.64.54 (4 Mar 1999 20:17:32 GMT)
X-Complaints-To: usenet@mimir.ifi.uio.no
NNTP-Posting-Date: 4 Mar 1999 20:17:32 GMT
User-Agent: Gnus/5.070066 (Pterodactyl Gnus v0.66) Emacs/20.3
Xref: news.cs.au.dk comp.lang.beta:11864

Erik Ernst <ernst@nobox.Eng.Sun.COM> writes:

> "Michael M. Tung" <michael.tung@uni-mainz.de> writes:
> 
> > Compiling file /usr/local/lib/xemacs-20.4/lisp/beta/beta-font-lock.el at
> > Wed Mar  3 23:30:34 1999
> >   ** assignment to free variable beta-font-lock-decl-regexp
> >   ** reference to free variable beta-font-lock-decl-regexp
> >   !! Symbol's value as variable is void ((beta-font-lock-decl-regexp))
> 
> Ah, in that case the XEmacs compiler is quite touchy .. the problem is
> that line 147 in beta-font-lock.el says
> 
>   (setq beta-font-lock-decl-regexp [..]
> 
> where is should have said 
> 
>   (defconst beta-font-lock-decl-regexp [..]

It still barfs with the same error, even in emacs.  (Try compiling it
with an empty emacs.)  It seems to be the lines looking like:

  (eval-when-compile
    (concat beta-font-lock-decl-regexp ...))

that causes the trouble.  I have never got the eval-when-compile stuff
to work as I hoped either :-) 

If I change the definition of beta-font-lock-decl-regexp to be defined
inside an (eval-when-compile ...) expression, the file will be
compiled with only two warnings.  (The warnings are due to not
requiring beta-mode!?)  But as the beta-font-lock-decl-regexp is used
by other things than in the other eval-when-compile the definition of
beta-font-lock-decl-regexp should maybe be enclosed in an
(eval-and-compile ...) instead!?

	Affi