From: Gisle Aas <gisle@aas.no>
Date: Sat, 11 Dec 2004 02:57:19 +0000 (-0800)
Subject: Re: Smoke [5.9.2] 23634 FAIL(F) openbsd 3.6 (i386/1 cpu) [PATCH]
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=75dbc64466f68eeb78bbdb5a24eb7586261e17b5;p=p5sagit%2Fp5-mst-13.2.git

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
--- 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;
 		}