XLISP 3.3, September 6, 2002 Copyright (c) 1984-2002, by David Betz
[1] (defun f (a b sep)
        (string-append a sep sep b))

F
[2] (f "Rosetta" "Code" ":")

"Rosetta::Code"
[3]