RosettaCodeData/Task/Quine/Racket/quine-2.rkt
2023-07-01 13:44:08 -04:00

4 lines
161 B
Racket

(module quine racket
(pretty-write
((λ (x) `(module quine racket (pretty-write (,x ',x))))
'(λ (x) `(module quine racket (pretty-write (,x ',x)))))))