Merge pull request #1336 from thePsguy/patch-3

{common-lisp}Issue #1157 comment for '-p'
This commit is contained in:
ven 2015-10-04 21:09:31 +02:00
commit 3c4afff4cc

View File

@ -175,7 +175,8 @@ nil ; for false - and the empty list
:age 5))
*rover* ; => #S(DOG :NAME "rover" :BREED "collie" :AGE 5)
(dog-p *rover*) ; => t ;; ewww)
(dog-p *rover*) ; => true #| -p signifies "predicate". It's used to
check if *rover* is an instance of dog. |#
(dog-name *rover*) ; => "rover"
;; Dog-p, make-dog, and dog-name are all created by defstruct!