aboutsummaryrefslogtreecommitdiffstats
path: root/src/search.c
diff options
context:
space:
mode:
authorRichard M. Stallman1997-06-09 18:01:02 +0000
committerRichard M. Stallman1997-06-09 18:01:02 +0000
commitb4577c63a79ed88d95c2b585d8a6cdaedd0ce2f7 (patch)
tree708e4716b954ddf70ca9b1bee4bfa95c720f1f24 /src/search.c
parentdacc955ce6fc94400b19004a8594b893271be531 (diff)
downloademacs-b4577c63a79ed88d95c2b585d8a6cdaedd0ce2f7.tar.gz
emacs-b4577c63a79ed88d95c2b585d8a6cdaedd0ce2f7.zip
(fast_c_string_match_ignore_case):
Renamed from fast_string_match_ignore_case. Set re_match_object.
Diffstat (limited to 'src/search.c')
-rw-r--r--src/search.c3
1 files changed, 2 insertions, 1 deletions
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)
394extern Lisp_Object Vascii_downcase_table; 394extern Lisp_Object Vascii_downcase_table;
395 395
396int 396int
397fast_string_match_ignore_case (regexp, string) 397fast_c_string_match_ignore_case (regexp, string)
398 Lisp_Object regexp; 398 Lisp_Object regexp;
399 char *string; 399 char *string;
400{ 400{
@@ -402,6 +402,7 @@ fast_string_match_ignore_case (regexp, string)
402 struct re_pattern_buffer *bufp; 402 struct re_pattern_buffer *bufp;
403 int len = strlen (string); 403 int len = strlen (string);
404 404
405 re_match_object = Qt;
405 bufp = compile_pattern (regexp, 0, 406 bufp = compile_pattern (regexp, 0,
406 XCHAR_TABLE (Vascii_downcase_table)->contents, 0); 407 XCHAR_TABLE (Vascii_downcase_table)->contents, 0);
407 immediate_quit = 1; 408 immediate_quit = 1;