[gambit-list] How to have define-macro expand to multiple

Isaac Freeman memotype at gmail.com
Sun Sep 13 11:57:11 EDT 2009


Ben,

Thanks. I had tried something like that, before, but I wasn't
quasiquoting the full (begin ...). What I came up with that works is
this:

(define-macro (define2 name1 name2 val1 val2)
  `(begin
     (define ,name1 ,val1)
     (define ,name2 ,val2)))

This works as expected.

Thanks! :)

On Sun, Sep 13, 2009 at 11:42 AM, Ben Weaver <ben at orangesoda.net> wrote:
> Hi Isaac,
>
> On Sun, Sep 13, 2009 at 11:24 AM, Isaac Freeman <memotype at gmail.com> wrote:
>
>> Specifically I'm looking to expand a macro to
>> multiple, distinct, top-level (define)'s.
>
> Try expanding into a BEGIN:
>
> (begin
>  (define ...)
>  (define ...)
>  ...)
>
> Good luck!
>
> -Ben
>



-- 
Isaac Freeman
memotype (at) gmail.com

"The diversity of mankind is a basic postulate of our knowledge of
human beings. But if mankind is diverse and individuated, then how can
anyone propose equality as an ideal? Every year, scholars hold
Conferences on Equality and call for greater equality, and no one
challenges the basic tenet. But what justification can equality find
in the nature of man? If each individual is unique, how else can he be
made 'equal' to others than by destroying most of what is human in him
and reducing human society to the mindless uniformity of the ant
heap?" --Murray N. Rothbard



More information about the Gambit-list mailing list