6 lines
79 B
Common Lisp
6 lines
79 B
Common Lisp
|
(defmethod car* ((arg cons))
|
||
|
|
(car arg))
|
||
|
|
|
||
|
|
(defmethod car* ((arg null))
|
||
|
|
nil)
|