RosettaCodeData/Task/Quine/Maxima/quine.maxima

4 lines
195 B
Text
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
/* Using ?format from the unerlying Lisp system */
lambda([],block([q:ascii(34),s:"lambda([],block([q:ascii(34),s:~A~A~A],print(?format(false,s,q,s,q))))()$"],print(?format(false,s,q,s,q))))()$