LISP - when 构造
when 宏后跟一个计算结果为 t 或 nil 的测试子句。 如果测试子句的计算结果为 nil,则不计算任何形式并返回 nil,但测试结果为 t,则执行测试子句后面的操作。
when 宏的语法 −
(when (test-clause) (<action1) )
示例
创建一个名为 main.lisp 的新源代码文件,并在其中键入以下代码。
(setq a 100) (when (> a 20) (format t "~% a is greater than 20")) (format t "~% value of a is ~d " a)
当你点击执行按钮,或者输入Ctrl+E,LISP立即执行,返回结果为 −
a is greater than 20 value of a is 100