Hallo,

On 7/8/07, Alex Queiroz <[EMAIL PROTECTED]> wrote:

     Ooops. Sorry, you can't do that because make-foreign is not a variable.


    I guess this is better:

(define-macro make-foreign
 (lambda (funcs)
   (map
    (lambda (func)
      `(define ,func (foreign-lambda int ,(symbol->string func) int)))
    funcs)))

Cheers,
--
-alex
http://www.ventonegro.org/


_______________________________________________
Chicken-users mailing list
[email protected]
http://lists.nongnu.org/mailman/listinfo/chicken-users

Reply via email to