screwlisp on Nostr: Reiddragon :ablobcatattention: Sometimes we might want to (defun print-hello (stream) ...
Reiddragon :ablobcatattention: (npub1qdh…kn25) Sometimes we might want to
(defun print-hello (stream) (print "hello" stream))
instead of
(flet ((print-hello (stream) (print "hello" stream)))
(print-hello *standard-output*))
for a lot of reasons, right?
Published at
2024-03-28 20:15:42Event JSON
{
"id": "c00df87a74fee6ef494a35c7285084a099a13114b69d939604ceb5cac4c6d4c0",
"pubkey": "9e9c58006890e3e31e306e20518f236965f1d8ee97640175d74afb88769a7c4d",
"created_at": 1711656942,
"kind": 1,
"tags": [
[
"p",
"036f39a09531cd0c53d803c65fb1707f51cdf74e19ed54db19683ea5e0a58810",
"wss://relay.mostr.pub"
],
[
"e",
"305b2a09c1595047201aed699ad9f26a53aa1c46e8bce3dcfe659611886df72d",
"wss://relay.mostr.pub",
"reply"
],
[
"proxy",
"https://mastodon.sdf.org/users/screwtape/statuses/112175149363370988",
"activitypub"
]
],
"content": "nostr:npub1qdhnngy4x8xsc57cq0r9lvts0aguma6wr8k4fkcedql2tc993qgq59kn25 \nSometimes we might want to\n(defun print-hello (stream) (print \"hello\" stream))\ninstead of\n(flet ((print-hello (stream) (print \"hello\" stream)))\n (print-hello *standard-output*))\nfor a lot of reasons, right?",
"sig": "78a39d28f90e4638d5f146066e3af247132c614c5db5f9022f7ba64821a204ee27ebaf03f62a008cdac445eaf4ec538473980a5b219cd0b0bc557b7b377f83dc"
}
