RosettaCodeData/Task/String-append/NewLISP/string-append.l

8 lines
116 B
Common Lisp

(setq str "foo")
(push "bar" str -1)
; or as an alternative introduced in v.10.1
(extend str "bar")
(println str)