Lisp.类与实例(Classes and Instances)

我们需要两个步骤来创建结构（structures）：首先调用defstruct来规划出结构的形式，然后使用类似make-point的函数来创建它们。创建实例也需要类似的两步。首先我们使用defclass定义一个类：

(defclass circle ()
  (radius center))

这个定义是说circle的每个实例将会有两个槽（slots，就像结构中的字段-field），分别叫做radius和center。

要创建这个类的实例，我们调用一个通用的make-instance函数（而不是一个指定的函数），并且将类名作为第一个参数传递给它：

[7]> 
(setf c (make-instance 'circle))
#<CIRCLE #x000348F69C38>

要设置这个实例的槽，我们可以使用setf和slot-value协同完成：

[8]> (setf (slot-value c 'radius) 1)
1

和结构字段类似，未初始化的槽是未定义的（undefined）。