case
case构造实现了多个test-action子句，如cond构造。 但是，它会评估关键表单，并根据对该键表单的评估允许多个操作子句。
case宏的语法是 -
CASE的模板是
(case (keyform)
((key1) (action<sub>1</sub> action<sub>2</sub> ...) )
((key2) (action<sub>1</sub> action<sub>2</sub> ...) )
...
((keyn) (action<sub>1</sub> action<sub>2</sub> ...) ))
例子 (Example)
创建一个名为main.lisp的新源代码文件，并在其中键入以下代码。
(setq day 4)
(case day
(1 (format t "~% Monday"))
(2 (format t "~% Tuesday"))
(3 (format t "~% Wednesday"))
(4 (format t "~% Thursday"))
(5 (format t "~% Friday"))
(6 (format t "~% Saturday"))
(7 (format t "~% Sunday")))
单击“执行”按钮或键入Ctrl + E时，LISP立即执行它，返回的结果为 -
Thursday
