screwlisp on Nostr: npub14hark…zk0hg Very detailed and enjoyable and tangible, with the mcclim ink ...

npub14hark9ff9kwgyktpkl7hn7cscf8hrdnycc8e9d3c9cpg47vzm0nshzk0hg (npub14ha…k0hg)
Very detailed and enjoyable and tangible, with the mcclim ink examples

Though, can you help me relate what is and isn't happening in these two functions one of which having your dlet? #lisp

(defun eg3 ()
(dlet (('x 1))
(let ((x -1))
(setf (symbol-value 'x) 2)
(print (list x (symbol-value 'x))))))

(defun eg4 (&aux (x 1))
(declare (special x))
(let ((x -1))
(locally (declare (special x)) (setf x 4))
(print (list x (locally (declare (special x)) x)))))