nprofile1qy2hwumn8ghj7un9d3shjtnddaehgu3wwp6kyqpqzglpd69ltamxe7nnm6rdfleu8amgg3sn24n8rvdey6avckmeax8qsejrff (nprofile…jrff) But you ask a good question, I wonder how one could introspect properties of procedures and change their names. The procedure in memory might store a reference to an interned symbol. I tried a few things in the REPL:
(define f (lambda () 'hey))
;; -> f
$33 = #<procedure f ()>
;; -> (define g f)
;; -> f
$34 = #<procedure f ()>
;; -> g
$35 = #<procedure f ()>
;; -> (let ((a (lambda () 'bye))) (set! f a) a)
$36 = #<procedure a ()>
;; -> f
$37 = #<procedure a ()>
;; -> g
$38 = #<procedure f ()>
So now the REPL thinks f is called a. And I discovered that you can change the name of a procedure in Guile like this:
(set! f (lambda args (apply f args)))
f
;; -> $40 = #<procedure f args>
Ramin Honary
npub105…puwdv
2025-04-30 09:32:01 UTC
in reply to nevent1q…dk3u
Author Public Key
npub1053m9ka5kf6r3rlcr3kmstaswqk2ewqduv2dvtjtud3p38r0dxvqepuwdvSeen on
wss://relay.ditto.pubPublished at
2025-04-30 09:32:01 UTCEvent JSON
{
"id": "53b24bc1a90d196284f22733bf59f7c7bf6d699fd184b9cb7de6b13c375dca35",
"pubkey": "7d23b2dbb4b274388ff81c6db82fb0702cacb80de314d62e4be362189c6f6998",
"created_at": 1746005521,
"kind": 1,
"tags": [
[
"p",
"123e16e8bf5f766cfa73de86d4ff3c3f76844613556671b1b926bacc5b79e98e",
"wss://relay.mostr.pub"
],
[
"p",
"6a3558cf15e6f724383ef20c385d65abf8af54d22fbd7f9c758fda61a08357ed",
"wss://relay.mostr.pub"
],
[
"e",
"0bf25a401c3019d2d82f711e2a83139a42641f9b3b2793570a83a540bc821ebb",
"wss://relay.mostr.pub",
"reply"
],
[
"proxy",
"https://fe.disroot.org/objects/cb772270-1307-46c2-b59e-4b24f2c05ee9",
"activitypub"
],
[
"client",
"Mostr",
"31990:6be38f8c63df7dbf84db7ec4a6e6fbbd8d19dca3b980efad18585c46f04b26f9:mostr",
"wss://relay.mostr.pub"
]
],
"content": "nostr:nprofile1qy2hwumn8ghj7un9d3shjtnddaehgu3wwp6kyqpqzglpd69ltamxe7nnm6rdfleu8amgg3sn24n8rvdey6avckmeax8qsejrff But you ask a good question, I wonder how one could introspect properties of procedures and change their names. The procedure in memory might store a reference to an interned symbol. I tried a few things in the REPL:\n\n(define f (lambda () 'hey))\n;; -\u003e f\n$33 = #\u003cprocedure f ()\u003e\n;; -\u003e (define g f)\n;; -\u003e f\n$34 = #\u003cprocedure f ()\u003e\n;; -\u003e g\n$35 = #\u003cprocedure f ()\u003e\n;; -\u003e (let ((a (lambda () 'bye))) (set! f a) a)\n$36 = #\u003cprocedure a ()\u003e\n;; -\u003e f\n$37 = #\u003cprocedure a ()\u003e\n;; -\u003e g\n$38 = #\u003cprocedure f ()\u003e\n\nSo now the REPL thinks f is called a. And I discovered that you can change the name of a procedure in Guile like this:\n\n(set! f (lambda args (apply f args)))\nf\n;; -\u003e $40 = #\u003cprocedure f args\u003e",
"sig": "3f11b64867a7c100b4cd499b3e357ccc891c7e667ea1400aff5b4974172e82037f92800571bb955c90089330f1b75c8185c0b76d16e5616600db405e9526c768"
}