[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Old-style backquotes in cc-vars.el
From: |
Davis Herring |
Subject: |
Re: Old-style backquotes in cc-vars.el |
Date: |
Thu, 11 Oct 2007 10:41:11 -0700 (PDT) |
User-agent: |
SquirrelMail/1.4.8-6.el3.2lanl |
> (defmacro defcustom-c-stylevar (name val doc &rest args)
> "Defines a style variable."
> (let* ((val (eval val))
> (type (eval (list 'identity (plist-get args :type))))
> (head (car type))
> (tail (cdr type))
> (newt (append (unless (plist-get tail :tag)
> '(:tag "Override style settings"))
> (unless (plist-get tail :value)
> `(:value ,val))
> tail)))
Are we sure that it's okay to do all these evaluations at macro expansion
time -- that is, do any of them depend on runtime things? And what is
(eval (list 'identity foo))) supposed to do differently than (eval foo)?
Davis
--
This product is sold by volume, not by mass. If it appears too dense or
too sparse, it is because mass-energy conversion has occurred during
shipping.