Mercurial > emacs
diff src/fns.c @ 28507:b6f06a755c7d
make_number/XINT/XUINT conversions; EQ/== fixes; ==Qnil -> NILP
| author | Ken Raeburn <raeburn@raeburn.org> |
|---|---|
| date | Wed, 05 Apr 2000 17:29:31 +0000 |
| parents | 9ffea423a7b0 |
| children | 976bc44944da |
line wrap: on
line diff
--- a/src/fns.c Tue Apr 04 21:15:08 2000 +0000 +++ b/src/fns.c Wed Apr 05 17:29:31 2000 +0000 @@ -840,7 +840,7 @@ { this = args[textprops[argnum].argnum]; copy_text_properties (make_number (textprops[argnum].from), - XSTRING (this)->size, this, + make_number (XSTRING (this)->size), this, make_number (textprops[argnum].to), val, Qnil); } } @@ -3950,7 +3950,7 @@ if (EQ (key, HASH_KEY (h, i)) || (h->cmpfn && h->cmpfn (h, key, hash_code, - HASH_KEY (h, i), HASH_HASH (h, i)))) + HASH_KEY (h, i), XUINT (HASH_HASH (h, i))))) break; idx = HASH_NEXT (h, i); } @@ -4017,7 +4017,7 @@ if (EQ (key, HASH_KEY (h, i)) || (h->cmpfn && h->cmpfn (h, key, hash_code, - HASH_KEY (h, i), HASH_HASH (h, i)))) + HASH_KEY (h, i), XUINT (HASH_HASH (h, i))))) { /* Take entry out of collision chain. */ if (NILP (prev))