Keyword Arguments

(defun print-array-size (array

&key

(stream *standard-output*)

UseGraphics)

(let ((size (length array)))

(if UseGraphics

(drawsize size stream) ; then

(print size stream)) ; else

size)))

• Call the function like this:

  • (print-array-size *my-array*)

• Or like this:

  • (print-array-size *my-array* :stream my-open-file)

Previous slide

Next slide

Back to first slide

View graphic version