Eval with local environment?

Eval with local environment?

[Christopher Howard]

[-- Attachment #1: Type: text/plain, Size: 391 bytes --]

I was just curious: Is there something you can pass to eval procedure
that using the local environment? e.g.,

(let ((foo 12)) (eval 'foo (this-environment)))

to get it to return 12. Of course, you could just

(let ((foo 12)) foo)

But suppose you were working with the identifier 'foo instead for some
reason. All I saw in docs was interaction-environment and null-
environment.

[-- Attachment #2: This is a digitally signed message part --]
[-- Type: application/pgp-signature, Size: 488 bytes --]

Re: Eval with local environment?

[David Kastrup]

Christopher Howard <christopher.howard@qlfiles.net> writes:

> I was just curious: Is there something you can pass to eval procedure
> that using the local environment? e.g.,
>
> (let ((foo 12)) (eval 'foo (this-environment)))
>
> to get it to return 12.

No.  But there is

(use-modules (ice-9 local-eval))

(let ((foo 12)) (local-eval 'foo (the-environment)))

-- 
David Kastrup