|
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?
[Prev in Thread] | Current Thread | [Next in Thread] |