OK, consider the code to be in the public domain. define-with-multiple-bindings or something similar would probably be a better name.
Tamas On Wed, 09 Dec 2009 19:16:50 -0500, Liam Healy wrote: > I like the idea of 2; it seems general enough that it belongs in > alexandria. > > Liam > > On Wed, Dec 9, 2009 at 9:10 AM, Tamas K Papp <tkp...@gmail.com> wrote: >> Hi, >> >> Two suggestions: >> >> 1. Could we have a plural form of WITH-FOREIGN-POINTER (similarly to >> WITH-FOREIGN-OBJECTS, WITH-FOREIGN-STRINGS). >> >> 2. In my own code, I usually use something like this: >> >> (defmacro with-multiple-bindings (macro) >> "Define a version of `macro' with multiple arguments, given as a >> list. Application of `macro' will be nested. The new name is the >> plural of the old one (generated using format)." >> (let ((plural (intern (format nil "~aS" macro)))) >> `(defmacro ,plural (bindings &body body) >> ,(format nil "Multiple binding version of ~(~a~)." macro) (if >> bindings >> `(,',macro ,(car bindings) >> (,',plural ,(cdr bindings) >> ,@body)) >> `(progn ,@body))))) >> >> (with-multiple-bindings with-foreign-pointer) >> >> Incorporating something similar would replace the repetitions in the >> CFFI code, and make it easier to define plural forms. >> >> Cheers, >> >> Tamas >> >> >> _______________________________________________ cffi-devel mailing list >> cffi-devel@common-lisp.net >> http://common-lisp.net/cgi-bin/mailman/listinfo/cffi-devel >> _______________________________________________ cffi-devel mailing list cffi-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/cffi-devel
