Make cmp-env-optimization a macro again

This commit is contained in:
jgarcia 2008-05-12 08:16:04 +00:00
parent 8f6fbb87cb
commit f5d2137452

View file

@ -575,7 +575,7 @@
when (and (consp i) (var-p (fourth i)))
collect (fourth i)))
(defun cmp-env-optimization (property &optional env)
(defmacro cmp-env-optimization (property &optional env)
(case (eval property)
(speed '*speed*)
(safety '*safety*)