摘要：
char函数取得字符串中指定位置的字符(zero-base) char=比较两字符是否相等 CL-USER> (setf x "hello") "hello" CL-USER> (char x 1) #\e CL-USER> (char= #\e (char x 1)) T CL-USER> (char= #\E (char x ... 阅读全文
摘要：
所有条件式的母体是cond,它带有两个新的优点：它允许多重条件式，与每个条件式相关的代码是隐式的progn。它预期在我们需要在一个if中使用另一个if的情况下使用。举例来说，这个伪member函数 CL-USER> (defun our-member (obj lst) (if (atom lst) nil ... 阅读全文
摘要：
CL-USER> (defstruct buf vec (start -1) (used -1) (new -1) (end -1)) BUF CL-USER> (defun bref (buf n) (svref (buf-vec buf) (mod n (length (buf-vec ... 阅读全文
摘要：
Jeff Weiner CEO at Linkedin 回顾我的工作履历，我可以很肯定的说至少有三个影响彻底的改变了我的职业生涯。追忆往事，可以饶有兴趣的发现这些事情的背景之间有多么大的差异：父母的建议，一本书中描述的旅程，以及一个坚持不懈的老板。无论它们之间有多么大的差异，所有这三件事情所共有的一点是：要不断的强化自己对终极理想的认识，明确自己最终想要的是什么，敞开胸怀让外界的力量... 阅读全文
摘要：
函数(1+ val)的作用是返回val + 1后的结果，但val的值不会变： CL-USER> (setf x 1) 1 CL-USER> (1+ x) 2 CL-USER> (1+ x) 2 CL-USER> x 1 CL-USER> (1+ x) 2 CL-USER> x 1 ... 阅读全文
摘要：
when与if唯一的不同点在于when的代码主体可以是多句：when的相反是unless:它接受同样的阐述，但主体仅在测试表达式返回假时，才对主体求值。CL-USER> (when (oddp that) (format t "Hmm,that's odd.") (+ that 1)) Hmm,that's odd. 6 CL-USER> (if (oddp that) (progn (format t "Hmm,that's odd.") (+ that 1))) Hmm,that's odd. ... 阅读全文
摘要：
CL-USER> (prog1 (+ 1 2) (+ 2 3) (+ 3 4)) 3 CL-USER> (prog2 (+ 1 2) (+ 2 3) (+ 3 4)) 5 CL-USER> (prog... 阅读全文
摘要：
CL-USER> (setf x 10) 10 CL-USER> x 10 CL-USER> (incf x 5) 15 CL-USER> x 15 CL-USER> x 15 CL-USER> (incf x 7) 22 CL-USER> x 22 CL-USER> 所以(incf x 5)等价于(setf x (+ x 5))CL-USER> (setf x (+ x 7)) 29 CL-USER> x 29 CL-USE... 阅读全文