Mercurial > emacs
comparison src/search.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 | 9a8814cc543c |
children | 3f60536745bd |
comparison
equal
deleted
inserted
replaced
28506:3d557619ba03 | 28507:b6f06a755c7d |
---|---|
216 /* Entries are initialized to nil, and may be set to nil by | 216 /* Entries are initialized to nil, and may be set to nil by |
217 compile_pattern_1 if the pattern isn't valid. Don't apply | 217 compile_pattern_1 if the pattern isn't valid. Don't apply |
218 XSTRING in those cases. However, compile_pattern_1 is only | 218 XSTRING in those cases. However, compile_pattern_1 is only |
219 applied to the cache entry we pick here to reuse. So nil | 219 applied to the cache entry we pick here to reuse. So nil |
220 should never appear before a non-nil entry. */ | 220 should never appear before a non-nil entry. */ |
221 if (cp->regexp == Qnil) | 221 if (NILP (cp->regexp)) |
222 goto compile_it; | 222 goto compile_it; |
223 if (XSTRING (cp->regexp)->size == XSTRING (pattern)->size | 223 if (XSTRING (cp->regexp)->size == XSTRING (pattern)->size |
224 && !NILP (Fstring_equal (cp->regexp, pattern)) | 224 && !NILP (Fstring_equal (cp->regexp, pattern)) |
225 && EQ (cp->buf.translate, (! NILP (translate) ? translate : make_number (0))) | 225 && EQ (cp->buf.translate, (! NILP (translate) ? translate : make_number (0))) |
226 && cp->posix == posix | 226 && cp->posix == posix |