LISP - case 构造
case 构造实现多个测试操作子句,如 cond 构造。 但是,它会评估一个关键表单,并允许基于该关键表单的评估执行多个操作子句。
case 宏的语法是 −
CASE 的模板是
(case (keyform) ((key1) (action1 action2 ...) ) ((key2) (action1 action2 ...) ) ... ((keyn) (action1 action2 ...) ))
示例
创建一个名为 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