RosettaCodeData/Task/Quine/ACL2/quine-1.acl2
2023-07-01 13:44:08 -04:00

6 lines
131 B
Text

(defun print-quine (quine)
(cw quine quine))
(print-quine
"(defun print-quine (quine)
(cw quine quine))
(print-quine ~x0)~%")