(defun make-cd (title artist rating ripped)
(list :title title :artits artist :rating rating :ripped ripped)
)
CL-USER> (make-cd "Roses" "Kathy" 7 t)
(:TITLE "Roses" :ARTITS "Kathy" :RATING 7 :RIPPED T)
开两个窗口,一个写代码,一个载入代码进行测试
代码修改之后需要再保存并且重新载入
本文介绍如何利用CL-USER环境中的函数来创建包含音乐标题、艺术家、评分和是否完整信息的音乐CD记录。

1324

被折叠的 条评论
为什么被折叠?



