Re: optimizing defconst

[John Paul Wallington]

Dan Nicolaescu <address@hidden> writes:

> Given this:
>
> (defconst viper-xemacs-p (featurep 'xemacs))
>
> (defun foo()
>   (if viper-xemacs-p (error "Hmmmm")))
>
>
> Shouldn't `foo' be optimized to just do nothing? 
>
> It is not:
[...]
> Am I missing something?

I suppose the question is whether there is lots of extant third-party
Emacs Lisp code that tries to set or let-bind constant variables and
if so whether it is worth breaking that code.  FWIW, I found that the
version of BBDB that I am using let-binds the constant variable
`bbdb-gag-messages'.