最近对Common Lisp比较感兴趣，这也是我第一次接触函数式编程，于是就把CLisp的一些笔记写了上来。不过现在都只学到一些很简单的东西，慢慢来吧w

判断一个数是否为奇数，是奇数则返回YES，偶数则返回NO。

Code

(defun is_odd(number)
        (when (oddp number)
                (return-from is_odd 'YES)
        )
        (return-from is_odd 'NO)
)
(print (is_odd 8))

Notes

defun 是定义一个函数。

when 是用来判断给定的表达式的真假。在Lisp中，'真'用't'来表示，'假'为'nil'。

return-from 后面接函数名, 返回值