RosettaCodeData/Task/Repeat-a-string/Common-Lisp/repeat-a-string-3.lisp

3 lines
71 B
Common Lisp

(defun repeat-string (n string)
(format nil "~V@{~a~:*~}" n string))