screwlisp on Nostr: Reiddragon :ablobcatattention: I'm worried I missed your point. (defun foo (&aux (bar ...
Reiddragon :ablobcatattention: (npub1qdh…kn25) I'm worried I missed your point.
(defun foo (&aux (bar 'baz))
(print bar)
(locally (declare (special bar)) (print bar)))
(defvar bar 'buz)
(foo)
=>
BAZ
BUZ
I'm a little lost about what's un/desirable.
Published at
2024-03-28 20:33:26Event JSON
{
"id": "5b0fb758ebc4ee2420ce4db747bf6c4c9ae3ad0f73b7964b10176b8fc6e466f5",
"pubkey": "9e9c58006890e3e31e306e20518f236965f1d8ee97640175d74afb88769a7c4d",
"created_at": 1711658006,
"kind": 1,
"tags": [
[
"p",
"036f39a09531cd0c53d803c65fb1707f51cdf74e19ed54db19683ea5e0a58810",
"wss://relay.mostr.pub"
],
[
"e",
"ddfe6d58504f0d075054112cae4cd29631a9fbc1ff22e853ff49edf59cb87772",
"wss://relay.mostr.pub",
"reply"
],
[
"proxy",
"https://mastodon.sdf.org/users/screwtape/statuses/112175219117457739",
"activitypub"
]
],
"content": "nostr:npub1qdhnngy4x8xsc57cq0r9lvts0aguma6wr8k4fkcedql2tc993qgq59kn25 \nI'm worried I missed your point.\n(defun foo (\u0026aux (bar 'baz))\n (print bar)\n (locally (declare (special bar)) (print bar)))\n(defvar bar 'buz)\n(foo)\n=\u003e\nBAZ\nBUZ\n\nI'm a little lost about what's un/desirable.",
"sig": "be847cc687144c146e9eb9dbfd51513aad2ef20eea2c0b8631f4ef4cf7e68c610668ca21fe54bb7776d39487655d354e3d56f7578eef0be30a8fd0b09b243ba2"
}