Respond with your personal quine cold
#quine #programming #commonLisp #computerScience #practice
(FORMAT
T
"(FORMAT T ~A~S~A ~0@* ~S (QUOTE ~S) ~S)"
#\"
(QUOTE
(PROGN (terpri)
(princ '|\;\;|) (princ '(can put anything here))
(terpri)
(princ '|\;\;|) (princ '(doublequotes are hard though.))
(terpri)
(FORMAT T ~A~S~A ~0@* ~S (QUOTE ~S) ~S)))
#\")
I feel like I forgot how to do this
Respond with your personal quine cold
Or, does this #commonLisp #programming #quine even work. Using a lambda instead of a complex format.
Oh, yeah, I guess this one is way better.
(let ((a '(lambda (a) `(progn (print "Side effects") (terpri) (funcall ,a ',a)))))
`(,a ',a))
Respond with your personal quine cold
@screwtape In #PicoLisp it is either
('((X) (list (lit X) (lit X))) '((X) (list (lit X) (lit X))))
or
(let X '(list 'let 'X (lit X) X) (list 'let 'X (lit X) X))