Question for #scheme ☯️ kings & queens 👑 ! Are there an alternative to clojure's alter-var-root https://clojuredocs.org/clojure.core/with-redefs in scheme?
Imagine I have a module `(X)` with `(define a 1) (define-public (f x) (+ x a))` and module `(Y)` that has `#:use-module (X)`. In `(Y)` want to alter a from `(X)` in a way that would also affect `f`. Example: (being in module `(Y)`): `(alter! a 2) (equal? (f 3) 5) => #t`
CC npub1cwwjvpgyj5fy8tdkw4d62zsym74eaqs4y7wt0c6nzt5a7lll9x2qvpny8k (npub1cww…ny8k) npub1f3srhzp5z8qwchfdyy6kceysfg9jzxr937ttracqrxuxuncc25mqgmjzfc (npub1f3s…jzfc) npub1gcht7nxyny85r6ezenuyp3f8ey73l773d0glpgeacudx6r5evh2szu00vs (npub1gch…00vs)
Grigory Shepelev /
npub1sr…9dk6q
2023-09-13 19:36:45
Author Public Key
npub1srmnmfqhw66aayzqn0ldvpjfq0jw0fj8gr9ygq84u4phlp7kpcsqg9dk6qPublished at
2023-09-13 19:36:45Event JSON
{
"id": "4a14b2a594a2e3fb19a1b87fe3c4e88fb347fed62b4da0d31e392f2c3e981a75",
"pubkey": "80f73da41776b5de90409bfed6064903e4e7a64740ca4400f5e5437f87d60e20",
"created_at": 1694633805,
"kind": 1,
"tags": [
[
"p",
"c39d260504951243adb6755ba50a04dfab9e8215279cb7e35312e9df7fff2994",
"wss://relay.mostr.pub"
],
[
"p",
"4c603b883411c0ec5d2d21356c64904a0b2118658f96b1f70019b86e4f185536",
"wss://relay.mostr.pub"
],
[
"p",
"462ebf4cc4990f41eb22ccf840c527c93d1ffbd16bd1f0a33dc71a6d0e9965d5",
"wss://relay.mostr.pub"
],
[
"p",
"1d4bdb2661b1023a704c5dc997230aba99f473da0d00b90acd364bd6f861d068",
"wss://relay.mostr.pub"
],
[
"p",
"a5752933c0b3b742a00ff4e143e75a5056603d9a8921e2faf2777961f919a8cc",
"wss://relay.mostr.pub"
],
[
"p",
"250b1246278eb04a8cdd13f63c20e9220b2845ded7bf6290381cf4bea4785257",
"wss://relay.mostr.pub"
],
[
"t",
"scheme"
],
[
"t",
"t"
],
[
"proxy",
"https://fosstodon.org/users/shegeley/statuses/111059521080185223",
"activitypub"
]
],
"content": "Question for #scheme ☯️ kings \u0026 queens 👑 ! Are there an alternative to clojure's alter-var-root https://clojuredocs.org/clojure.core/with-redefs in scheme?\n\nImagine I have a module `(X)` with `(define a 1) (define-public (f x) (+ x a))` and module `(Y)` that has `#:use-module (X)`. In `(Y)` want to alter a from `(X)` in a way that would also affect `f`. Example: (being in module `(Y)`): `(alter! a 2) (equal? (f 3) 5) =\u003e #t`\n\nCC nostr:npub1cwwjvpgyj5fy8tdkw4d62zsym74eaqs4y7wt0c6nzt5a7lll9x2qvpny8k nostr:npub1f3srhzp5z8qwchfdyy6kceysfg9jzxr937ttracqrxuxuncc25mqgmjzfc nostr:npub1gcht7nxyny85r6ezenuyp3f8ey73l773d0glpgeacudx6r5evh2szu00vs",
"sig": "843d23b57b682f651cbe5895ca105ae87ecb212c44e088119abfa65678250840b862f31ef92a9a456547359216fa64dff957c4325b040a933a64a565a82aea4e"
}