Mercurial > emacs
changeset 85329:ad9922c079e4
(Fpurecopy): Set the pvec tag on pseudo vectors.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Tue, 16 Oct 2007 15:49:43 +0000 |
| parents | d0d527210b0c |
| children | 0bc184c59770 |
| files | src/ChangeLog src/alloc.c |
| diffstat | 2 files changed, 6 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Tue Oct 16 15:42:58 2007 +0000 +++ b/src/ChangeLog Tue Oct 16 15:49:43 2007 +0000 @@ -1,5 +1,7 @@ 2007-10-16 Stefan Monnier <monnier@iro.umontreal.ca> + * alloc.c (Fpurecopy): Set the pvec tag on pseudo vectors. + * lisp.h (enum Lisp_Misc_Type): Del Lisp_Misc_Some_Buffer_Local_Value. (XMISCANY): New macro. (XMISCTYPE): Use it.
--- a/src/alloc.c Tue Oct 16 15:42:58 2007 +0000 +++ b/src/alloc.c Tue Oct 16 15:49:43 2007 +0000 @@ -4966,7 +4966,10 @@ for (i = 0; i < size; i++) vec->contents[i] = Fpurecopy (XVECTOR (obj)->contents[i]); if (COMPILEDP (obj)) - XSETCOMPILED (obj, vec); + { + XSETPVECTYPE (vec, PVEC_COMPILED); + XSETCOMPILED (obj, vec); + } else XSETVECTOR (obj, vec); return obj;