[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

optimizing defconst

From: Dan Nicolaescu
Subject: optimizing defconst
Date: Sat, 27 Oct 2007 10:47:26 -0700

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:

byte code for foo:
  args: nil
0 varref          viper-xemacs-p
1 goto-if-nil-else-pop 1
4 constant  error
5 constant  "Hmmmm"
6 call        1
7:1           return      

Am I missing something?

reply via email to

[Prev in Thread] Current Thread [Next in Thread]