Searched refs:pat_string (Results 1 – 2 of 2) sorted by relevance
| /openbsd/gnu/usr.bin/perl/t/re/ |
| H A D | pat.t | 1116 my $pat_string = "[^\\S ]";
1117 unlike(" ", qr/$pat_string/, "Verify ' ' !~ /$pat_string/");
1118 like("\t", qr/$pat_string/, "Verify '\\t =~ /$pat_string/");
1119 unlike($nbsp, qr/$pat_string/, "Verify non-utf8-NBSP !~ /$pat_string/");
1121 like($nbsp, qr/$pat_string/, "Verify utf8-NBSP =~ /$pat_string/");
1122 unlike($non_s, qr/$pat_string/, "Verify non-utf8-inverted-bang !~ /$pat_string/");
1124 unlike($non_s, qr/$pat_string/, "Verify utf8-inverted-bang !~ /$pat_string/");
|
| /openbsd/gnu/usr.bin/perl/ |
| H A D | regexec.c | 2270 char *pat_string; /* The pattern's exactish string */ in S_find_byclass() local
2541 pat_string = STRINGs(c); in S_find_byclass()
2553 c1 = *pat_string; in S_find_byclass()
2563 if ( (ln == 1 || folder(aTHX_ s + 1, pat_string + 1, ln - 1)) in S_find_byclass()
2587 if ( (ln == 1 || folder(aTHX_ s + 1, pat_string + 1, ln - 1)) in S_find_byclass()
2599 && (ln == 1 || folder(aTHX_ s + 1, pat_string + 1, ln - 1)) in S_find_byclass()
2666 pat_string = STRINGs(c); in S_find_byclass()
2668 pat_end = pat_string + ln; in S_find_byclass()
2670 ? utf8_length((U8 *) pat_string, (U8 *) pat_end) in S_find_byclass()
2700 pat_string, NULL, ln, is_utf8_pat, in S_find_byclass()
|