Re: macro for export-xml-rpc-method

Willem Broekema <[email protected]> Wed, 29 Jul 2009 13:53:14 +0200

Newsgroups	gmane.lisp.allegro
Message-ID	<[email protected]>

On Wed, Jul 29, 2009 at 1:41 PM, Willem Broekema<[email protected]> wrote:
> #.(progn ,@(loop for (server method-spec types-list) in *my-methods*
> =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 collect (export-xml-rpc-metho=
d ,server ',method-spec ,@types-list)))

Oops, that's wrong as it lacks backquotes. This should work:

#.`(progn ,@(loop for (server method-spec types-list) in *my-methods*
                        collect `(export-xml-rpc-method ,server
',method-spec ,@types-list)))

- Willem