diff options
| author | Karl Williamson <public@khwilliamson.com> | 2010-11-27 09:42:48 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2010-11-28 04:49:13 -0800 |
| commit | 1b9f127b4dff87fa8c6be8acf741af73f72fea81 (patch) | |
| tree | 01422b32900632e385bc777a201b15faee83fbf8 /embed.fnc | |
| parent | e3ef43a5d915565241c254f7c7be154729e81162 (diff) | |
| download | perl-1b9f127b4dff87fa8c6be8acf741af73f72fea81.tar.gz | |
Add Perl_foldEQ_latin1()
This function compares two non-utf8 strings to see if they are
equivalent without regards to case differences. It does not work nor
check for three problematic code points that require special handling:
MICRO_SIGN, LATIN_SMALL_LETTER_SHARP_S, and
LATIN_SMALL_LETTER_Y_WITH_DIAERESIS.
make regen required
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -517,6 +517,7 @@ Am |I32 |ibcmp_utf8 |NN const char *s1|NULLOK char **pe1|UV l1 \ Apd |I32 |foldEQ_utf8 |NN const char *s1|NULLOK char **pe1|UV l1 \ |bool u1|NN const char *s2|NULLOK char **pe2 \ |UV l2|bool u2 +AnpP |I32 |foldEQ_latin1 |NN const char* a|NN const char* b|I32 len #if defined(PERL_IN_DOIO_C) sR |bool |ingroup |Gid_t testgid|bool effective #endif |