RosettaCodeData/Task/Reverse-words-in-a-string/PicoLisp/reverse-words-in-a-string.l

4 lines
81 B
Common Lisp

(in "FireIce.txt"
(until (eof)
(prinl (glue " " (flip (split (line) " "))))))