RosettaCodeData/Task/Variadic-function/Emacs-Lisp/variadic-function-1.l
Ingy döt Net 776bba907c Sync
2013-10-27 22:24:23 +00:00

6 lines
175 B
Common Lisp

(defun my-print-args (&rest arg-list)
(message "there are %d argument(s)" (length arg-list))
(dolist (arg arg-list)
(message "arg is %S" arg)))
(my-print-args 1 2 3)