Mercurial > emacs

comparison src/fns.c @ 28481:3caab3235bc1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(larger_vector): Make externally visible.
author Gerd Moellmann <gerd@gnu.org>
date Mon, 03 Apr 2000 12:13:45 +0000
parents 33f6a8ee4733
children 9ffea423a7b0
comparison
equal deleted inserted replaced
28480:cbe58003b232 28481:3caab3235bc1
3473 /* Function prototypes. */ 3473 /* Function prototypes. */
3474 3474
3475 static struct Lisp_Hash_Table *check_hash_table P_ ((Lisp_Object)); 3475 static struct Lisp_Hash_Table *check_hash_table P_ ((Lisp_Object));
3476 static int next_almost_prime P_ ((int)); 3476 static int next_almost_prime P_ ((int));
3477 static int get_key_arg P_ ((Lisp_Object, int, Lisp_Object *, char *)); 3477 static int get_key_arg P_ ((Lisp_Object, int, Lisp_Object *, char *));
3478 static Lisp_Object larger_vector P_ ((Lisp_Object, int, Lisp_Object));
3479 static void maybe_resize_hash_table P_ ((struct Lisp_Hash_Table *)); 3478 static void maybe_resize_hash_table P_ ((struct Lisp_Hash_Table *));
3480 static int cmpfn_eql P_ ((struct Lisp_Hash_Table *, Lisp_Object, unsigned, 3479 static int cmpfn_eql P_ ((struct Lisp_Hash_Table *, Lisp_Object, unsigned,
3481 Lisp_Object, unsigned)); 3480 Lisp_Object, unsigned));
3482 static int cmpfn_equal P_ ((struct Lisp_Hash_Table *, Lisp_Object, unsigned, 3481 static int cmpfn_equal P_ ((struct Lisp_Hash_Table *, Lisp_Object, unsigned,
3483 Lisp_Object, unsigned)); 3482 Lisp_Object, unsigned));
3562 3561
3563 /* Return a Lisp vector which has the same contents as VEC but has 3562 /* Return a Lisp vector which has the same contents as VEC but has
3564 size NEW_SIZE, NEW_SIZE >= VEC->size. Entries in the resulting 3563 size NEW_SIZE, NEW_SIZE >= VEC->size. Entries in the resulting
3565 vector that are not copied from VEC are set to INIT. */ 3564 vector that are not copied from VEC are set to INIT. */
3566 3565
3567 static Lisp_Object 3566 Lisp_Object
3568 larger_vector (vec, new_size, init) 3567 larger_vector (vec, new_size, init)
3569 Lisp_Object vec; 3568 Lisp_Object vec;
3570 int new_size; 3569 int new_size;
3571 Lisp_Object init; 3570 Lisp_Object init;
3572 { 3571 {