18/04/21 21:20:16.29 20hKSpui.net
>>928 common lisp
(let ((a '("java" "ruby" "rust")))
(format t "~{~A~^, ~}~%" a)
(princ (reduce (lambda ($0 $1) (concatenate 'string $0 ", " $1)) a))
)
; java, ruby, rust
; java, ruby, rust
18/04/21 21:20:16.29 20hKSpui.net
>>928 common lisp
(let ((a '("java" "ruby" "rust")))
(format t "~{~A~^, ~}~%" a)
(princ (reduce (lambda ($0 $1) (concatenate 'string $0 ", " $1)) a))
)
; java, ruby, rust
; java, ruby, rust