"AS" == Alaric Snell-Pym <[EMAIL PROTECTED]> writes:

[...]

AS> He suggested I ask on The List, so here it is. Is there a way to
AS> write parameterize-from-alist without eval hackery, or shall I just
AS> use the wings dynamic environment?

       'Course.  However, I'd recommend for it to be implemented as a
       function, not as a macro.

(define (parameterize-from-alist alist thunk)
 (let loop ((alist alist))
   (if (not (null? alist))
       (parameterize ((caar alist) (cdar alist))
         (loop (cdr alist)))
       (thunk))))

[...]


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

Reply via email to