摘要: 使用完后需要使用close函数修补myfile上的洞。对标准输入输出流的理解标准输入流指键盘,则上图中的myfile为键盘,读取的内容从键盘input to流标准输出流指电脑屏幕,则上图中的myfile为屏幕,写入的内容output to屏幕 阅读全文
posted @ 2013-01-02 17:54 flowjacky 阅读(143) 评论(0) 推荐(0) 编辑
摘要: 当defun的第一个参数是(setf f)这样的形式时,是在定义使用(setf (f params) val)时的行为。 例如: CL-USER> (setf lst (list 'a 'b 'c)) (A B C) CL-USER> (defun fun (x) (car x)) FUN CL-USER> (setf (fu... 阅读全文
posted @ 2013-01-02 17:22 flowjacky 阅读(300) 评论(0) 推荐(0) 编辑
摘要: CL-USER> (defun pseudo-cat (file) (with-open-file (str file :direction :input) (do ((line (read-line str nil 'eof) (read-line str nil 'eof))) ((eql line... 阅读全文
posted @ 2013-01-02 11:39 flowjacky 阅读(160) 评论(0) 推荐(0) 编辑
摘要: CL-USER> (setf path (make-pathname :name "BECKY")) #P"BECKY" CL-USER> (with-open-file (bstr path :direction :output :if-exists :supersede) (format bstr "hello worl... 阅读全文
posted @ 2013-01-02 10:44 flowjacky 阅读(133) 评论(0) 推荐(0) 编辑
摘要: 马修·梅(Matthew E. May) 由精神系统科学我们得知,要想更高效、更富创造力,我们需要令大脑适时休息。冷静思绪可激发绝佳的灵感,但在繁忙的工作中挤出时间沉思绝非易事。以下是三种在工作中沉淀思绪的方法,快速简单,步骤详尽。 快速冥想 洛杉矶加州大学精神成像实验室的最新研究结果表明,经常冥想可令大脑特定的区域显示更多灰质,在大脑区域之间建立更强的联系,减少随年龄增长患有脑萎缩的风险。... 阅读全文
posted @ 2013-01-02 08:27 flowjacky 阅读(295) 评论(0) 推荐(0) 编辑