diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-01-01 18:27:50 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-01-01 18:27:50 +0000 |
| commit | 0b20a7e9c202dd47ad80fa74a4b74690d7d37bd5 (patch) | |
| tree | 585cae4c8711231690ecd63879e82287400db073 /regexec.c | |
| parent | d3fa951d1a777fed63c03612068547db2a6ed82f (diff) | |
| download | perl-0b20a7e9c202dd47ad80fa74a4b74690d7d37bd5.tar.gz | |
Now that to_utf8_fold() was fixed.
p4raw-id: //depot/perl@14004
Diffstat (limited to 'regexec.c')
| -rw-r--r-- | regexec.c | 6 |
1 files changed, 2 insertions, 4 deletions
@@ -1002,8 +1002,7 @@ S_find_byclass(pTHX_ regexp * prog, regnode *c, char *s, char *strend, char *sta goto got_it; else { uvchr_to_utf8(tmpbuf, c); - to_utf8_fold(tmpbuf, foldbuf, &foldlen); - f = utf8_to_uvchr(foldbuf, 0); + f = to_utf8_fold(tmpbuf, foldbuf, &foldlen); if ( f != c && (f == c1 || f == c2) && (ln == foldlen || @@ -1041,8 +1040,7 @@ S_find_byclass(pTHX_ regexp * prog, regnode *c, char *s, char *strend, char *sta goto got_it; else { uvchr_to_utf8(tmpbuf, c); - to_utf8_fold(tmpbuf, foldbuf, &foldlen); - f = utf8_to_uvchr(foldbuf, 0); + f = to_utf8_fold(tmpbuf, foldbuf, &foldlen); if ( f != c && (f == c1 || f == c2) && (ln == foldlen || |