diff options
| author | Gisle Aas <gisle@aas.no> | 2004-12-10 18:57:19 -0800 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2004-12-13 08:39:34 +0000 |
| commit | 75dbc64466f68eeb78bbdb5a24eb7586261e17b5 (patch) | |
| tree | 510cb36f7ce4bb4fa1996ae64b8573255b665e01 /utf8.c | |
| parent | 20f13e4aa04ece013e593e83cc50c8d459eaa7a7 (diff) | |
| download | perl-75dbc64466f68eeb78bbdb5a24eb7586261e17b5.tar.gz | |
Re: Smoke [5.9.2] 23634 FAIL(F) openbsd 3.6 (i386/1 cpu) [PATCH]
Message-ID: <lrr7lxje5s.fsf_-_@caliper.activestate.com>
p4raw-id: //depot/perl@23640
Diffstat (limited to 'utf8.c')
| -rw-r--r-- | utf8.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -432,7 +432,7 @@ Perl_utf8n_to_uvuni(pTHX_ U8 *s, STRLEN curlen, STRLEN *retlen, U32 flags) if (!(uv > ouv)) { /* These cannot be allowed. */ if (uv == ouv) { - if (!(flags & UTF8_ALLOW_LONG)) { + if (expectlen != 13 && !(flags & UTF8_ALLOW_LONG)) { warning = UTF8_WARN_LONG; goto malformed; } |