Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
be5f4dfb
Commit
be5f4dfb
authored
Oct 18, 2004
by
Kenichi Handa
Browse files
(fast_string_match_ignore_case): New function.
parent
a0aa1111
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
21 additions
and
0 deletions
+21
-0
src/search.c
src/search.c
+21
-0
No files found.
src/search.c
View file @
be5f4dfb
...
...
@@ -493,6 +493,27 @@ fast_c_string_match_ignore_case (regexp, string)
immediate_quit
=
0
;
return
val
;
}
/* Like fast_string_match but ignore case. */
int
fast_string_match_ignore_case
(
regexp
,
string
)
Lisp_Object
regexp
,
string
;
{
int
val
;
struct
re_pattern_buffer
*
bufp
;
bufp
=
compile_pattern
(
regexp
,
0
,
Vascii_downcase_table
,
0
,
STRING_MULTIBYTE
(
string
));
immediate_quit
=
1
;
re_match_object
=
string
;
val
=
re_search
(
bufp
,
(
char
*
)
SDATA
(
string
),
SBYTES
(
string
),
0
,
SBYTES
(
string
),
0
);
immediate_quit
=
0
;
return
val
;
}
/* The newline cache: remembering which sections of text have no newlines. */
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment