RosettaCodeData/Task/Interactive-programming/Emacs-Lisp/interactive-programming-1.l

6 lines
116 B
Common Lisp

(defun my-join (str1 str2 sep)
(concat str1 sep sep str2))
my-join
(my-join "Rosetta" "Code" ":")
"Rosetta::Code"