7 lines
227 B
Common Lisp
7 lines
227 B
Common Lisp
(defun do-something (argument &key ((secret-arg secret) "default"))
|
|
(format t "Argument is ~a, secret is ~a" argument secret))
|
|
|
|
;; Normal caller
|
|
(do-something "Foo")
|
|
;; Special caller:
|
|
(do-something "Foo" 'secret-arg "Bar")
|