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