4 lines
164 B
Text
4 lines
164 B
Text
(let (S (chop "rosetta code phrase reversal") L (split S " "))
|
|
(prinl (reverse S))
|
|
(prinl (glue " " (mapcar reverse L)))
|
|
(prinl (glue " " (reverse L))) )
|