Mercurial > emacs
changeset 86163:d28f1d2b83d5
* alloc.c (allocate_other_vector):
* lisp.h (allocate_other_vector): Remove.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Fri, 16 Nov 2007 21:24:59 +0000 |
| parents | e7cf3055e000 |
| children | e509314f0d59 |
| files | src/ChangeLog src/alloc.c src/lisp.h |
| diffstat | 3 files changed, 4 insertions(+), 17 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Fri Nov 16 21:23:07 2007 +0000 +++ b/src/ChangeLog Fri Nov 16 21:24:59 2007 +0000 @@ -1,5 +1,8 @@ 2007-11-16 Stefan Monnier <monnier@iro.umontreal.ca> + * alloc.c (allocate_other_vector): + * lisp.h (allocate_other_vector): Remove. + * window.c (struct save_window_data): Move non-lisp data to the end and make it `int' rather than Lisp_Object. (Fcurrent_window_configuration): Use ALLOCATE_PSEUDOVECTOR. @@ -29,6 +32,7 @@ * alloc.c (ALLOCATE_PSEUDOVECTOR): Move to lisp.h. (allocate_pseudovector): Make non-static. + * lisp.h (enum pvec_type): New tag PVEC_OTHER. (allocate_pseudovector): Declare. (ALLOCATE_PSEUDOVECTOR): Move from alloc.c
--- a/src/alloc.c Fri Nov 16 21:23:07 2007 +0000 +++ b/src/alloc.c Fri Nov 16 21:24:59 2007 +0000 @@ -3029,22 +3029,6 @@ } -/* Only used for PVEC_WINDOW_CONFIGURATION. */ -struct Lisp_Vector * -allocate_other_vector (len) - EMACS_INT len; -{ - struct Lisp_Vector *v = allocate_vectorlike (len); - EMACS_INT i; - - for (i = 0; i < len; ++i) - v->contents[i] = Qnil; - v->size = len; - - return v; -} - - DEFUN ("make-vector", Fmake_vector, Smake_vector, 2, 2, 0, doc: /* Return a newly created vector of length LENGTH, with each element being INIT. See also the function `vector'. */)
--- a/src/lisp.h Fri Nov 16 21:23:07 2007 +0000 +++ b/src/lisp.h Fri Nov 16 21:24:59 2007 +0000 @@ -2612,7 +2612,6 @@ ((typ*) \ allocate_pseudovector \ (VECSIZE (typ), PSEUDOVECSIZE (typ, field), tag)) -extern struct Lisp_Vector *allocate_other_vector P_ ((EMACS_INT)); extern struct Lisp_Hash_Table *allocate_hash_table P_ ((void)); extern struct window *allocate_window P_ ((void)); extern struct frame *allocate_frame P_ ((void));