(setf a(read-from-string(format()"(~A)"#1=(read-line)))b 0 _(loop(format t"~@[~*~A~:* ~]~A "(find(incf b)a)#1#)))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page