Hello all,

I've noticed that elephant blithely ignores type declarations on slots;
e.g. something like this:

(deftype position ()
  `(integer 1 99))


(defclass foo-object ()
  ((name          :type string
                  :index t
                  :reader  foo-name
                  :initarg :name)
   (position      :type     position
                  :accessor foo-position
                  :initform 1))
  (:metaclass persistent-metaclass))

Elephant will happily let me store 100 in the foo-object position slot.  

Cheers,
                Alain Picard

-- 
Please read about why Top Posting
is evil at: http://en.wikipedia.org/wiki/Top-posting
and http://www.dickalba.demon.co.uk/usenet/guide/faq_topp.html
Please read about why HTML in email is evil at: 
http://www.birdhouse.org/etc/evilmail.html


_______________________________________________
elephant-devel site list
elephant-devel@common-lisp.net
http://common-lisp.net/mailman/listinfo/elephant-devel

Reply via email to