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

diff --git a/utf8.c b/utf8.c
index 7571e29..c6276c7 100644 (file)
--- a/utf8.c
+++ b/utf8.c
@@ -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;
                }