|
From: | David Kastrup |
Subject: | Re: [PATCH] Implement local-eval, local-compile, and the-environment |
Date: | Thu, 05 Jan 2012 17:36:32 +0100 |
User-agent: | Gnus/5.13 (Gnus v5.13) Emacs/24.0.92 (gnu/linux) |
Mark H Weaver <address@hidden> writes: > David Kastrup <address@hidden> writes: > >> How will either fare with: >> >> (let ((env >> (let ((x 1)) >> (the-environment)))) >> (local-eval '(set! x 4) env)) > > This example (or more complex ones based on the same idea) present no > difficulties for either patch. Ah, I see that set! has made it explicitly into the patterns. What about (define foo (make-procedure-with-setter vector-ref vector-set!)) (let ((env (let ((x (make-vector 2 #f))) (the-environment)))) (local-eval '(set! (foo x 1) 3) env)) -- David Kastrup
[Prev in Thread] | Current Thread | [Next in Thread] |