Re: macro/eval question

2008-11-07 Thread Rich Hickey
On Nov 7, 5:41 pm, Stuart Halloway <[EMAIL PROTECTED]> wrote: > Hi Rich, > > Sorry for being unclear. define-ant-task will be called as I > reflectively walk Ant's object model. A more complete listing follows. > The problem is that I am passing (.getKey td) to the macro, where > (.getKey td) re

Re: macro/eval question

2008-11-07 Thread Stuart Halloway
Hi Michael, See my response to Rich for a more complete example of what I am trying to do. The unquoted let doesn't seem to work for me, e.g. (defmacro doit [thing] (let [evaled-thing thing] evaled-thing)) (macroexpand '(doit "foo")) -> "foo" (macroexpand-1 '(doit (.toUpperCase "foo

Re: macro/eval question

2008-11-07 Thread Stuart Halloway
Hi Rich, Sorry for being unclear. define-ant-task will be called as I reflectively walk Ant's object model. A more complete listing follows. The problem is that I am passing (.getKey td) to the macro, where (.getKey td) returns a string--or would if I evaled it :-) Stuart P.S. The whole t

Re: macro/eval question

2008-11-07 Thread Michael Reid
Hi, > On Nov 7, 3:48 pm, Stuart Halloway <[EMAIL PROTECTED]> wrote: >> The following macro in lancet defines an ant task. >> >>(defmacro define-ant-task [task-name] >> `(def ~(symbol task-name) (create-ant-task ~task-name))) >> >> (At least) one of the following assumptions is wrong: >>

Re: macro/eval question

2008-11-07 Thread Rich Hickey
On Nov 7, 3:48 pm, Stuart Halloway <[EMAIL PROTECTED]> wrote: > The following macro in lancet defines an ant task. > >(defmacro define-ant-task [task-name] > `(def ~(symbol task-name) (create-ant-task ~task-name))) > > (At least) one of the following assumptions is wrong: > > (1) define

macro/eval question

2008-11-07 Thread Stuart Halloway
The following macro in lancet defines an ant task. (defmacro define-ant-task [task-name] `(def ~(symbol task-name) (create-ant-task ~task-name))) (At least) one of the following assumptions is wrong: (1) define-ant-task needs to be a macro so it can drop args into def. (2) define-ant-t