6 lines
119 B
Common Lisp
6 lines
119 B
Common Lisp
(defun print-name (&key first (last "?"))
|
|
(princ last)
|
|
(when first
|
|
(princ ", ")
|
|
(princ first))
|
|
(values))
|