comparison src/lread.c @ 11868:129b45ef421b

(oblookup): Delete argument hashp.
author Karl Heuer <kwzh@gnu.org>
date Mon, 22 May 1995 20:14:36 +0000
parents f2f0f3b55a7e
children d972c95e7577
comparison
equal deleted inserted replaced
11867:b00d51017e13 11868:129b45ef421b
1790 return nil. 1790 return nil.
1791 1791
1792 Also store the bucket number in oblookup_last_bucket_number. */ 1792 Also store the bucket number in oblookup_last_bucket_number. */
1793 1793
1794 Lisp_Object 1794 Lisp_Object
1795 oblookup (obarray, ptr, size, hashp) 1795 oblookup (obarray, ptr, size)
1796 Lisp_Object obarray; 1796 Lisp_Object obarray;
1797 register char *ptr; 1797 register char *ptr;
1798 register int size; 1798 register int size;
1799 int *hashp;
1800 { 1799 {
1801 int hash; 1800 int hash;
1802 int obsize; 1801 int obsize;
1803 register Lisp_Object tail; 1802 register Lisp_Object tail;
1804 Lisp_Object bucket, tem; 1803 Lisp_Object bucket, tem;