Fix EQUALP on structures with raw slots.
authorStas Boukarev <stassats@gmail.com>
Sun, 3 Nov 2013 19:32:09 +0000 (23:32 +0400)
committerStas Boukarev <stassats@gmail.com>
Sun, 3 Nov 2013 19:40:06 +0000 (23:40 +0400)
commitcc67baa3070a13bd84bb37680761011e689fb917
tree99a49b67ff11e5bd5a533994daca21083b9e472f
parent9c9d6dbdc28a8bfe70be09f35263e9ec02411d0e
Fix EQUALP on structures with raw slots.

It always incremented the index by 1, even if slot takes up more than
one word. Increment by raw-slot-data-n-words.
NEWS
src/code/target-defstruct.lisp
tests/defstruct.impure.lisp