From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 9 Jun 1997 18:01:02 +0000 (+0000)
Subject: (fast_c_string_match_ignore_case):
X-Git-Tag: emacs-20.1~1753
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b4577c63a79ed88d95c2b585d8a6cdaedd0ce2f7;p=emacs.git

(fast_c_string_match_ignore_case):
Renamed from fast_string_match_ignore_case.  Set re_match_object.
---

diff --git a/src/search.c b/src/search.c
index 2678dc313ce..790f35fd626 100644
--- a/src/search.c
+++ b/src/search.c
@@ -394,7 +394,7 @@ fast_string_match (regexp, string)
 extern Lisp_Object Vascii_downcase_table;
 
 int
-fast_string_match_ignore_case (regexp, string)
+fast_c_string_match_ignore_case (regexp, string)
      Lisp_Object regexp;
      char *string;
 {
@@ -402,6 +402,7 @@ fast_string_match_ignore_case (regexp, string)
   struct re_pattern_buffer *bufp;
   int len = strlen (string);
 
+  re_match_object = Qt;
   bufp = compile_pattern (regexp, 0,
 			  XCHAR_TABLE (Vascii_downcase_table)->contents, 0);
   immediate_quit = 1;