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