#commonlisp Equality
(defstruct fooa)
(defparameter *a* (make-foo :a 1))
(defparameter *b* (make-foo :a 1))
(eq *a* *b*) ;; NIL
(eql *a* *b*) ;; NIL
(equal *a* *b*) ;; NIL
(equalp *a* *b*) ;; T
#commonlisp Equality
(defstruct fooGNU social JP is a social network, courtesy of GNU social JP管理人. It runs on GNU social, version 2.0.2-dev, available under the GNU Affero General Public License.
All GNU social JP content and data are available under the Creative Commons Attribution 3.0 license.