This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
UTF8_ALLOW_ANYUV should not allow overlong sequences [PATCH]
authorGisle Aas <gisle@aas.no>
Mon, 6 Dec 2004 02:59:24 +0000 (18:59 -0800)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Thu, 9 Dec 2004 17:12:12 +0000 (17:12 +0000)
Message-ID: <lrmzwrae0j.fsf_-_@caliper.activestate.com>

p4raw-id: //depot/perl@23632

utf8.h

diff --git a/utf8.h b/utf8.h
index d5a8845..376280d 100644 (file)
--- a/utf8.h
+++ b/utf8.h
@@ -183,8 +183,7 @@ encoded character.
 #define UTF8_ALLOW_FFFF                        0x0040 /* Allows also FFFE. */
 #define UTF8_ALLOW_LONG                        0x0080
 #define UTF8_ALLOW_ANYUV               (UTF8_ALLOW_EMPTY|UTF8_ALLOW_FE_FF|\
-                                        UTF8_ALLOW_SURROGATE|\
-                                        UTF8_ALLOW_FFFF|UTF8_ALLOW_LONG)
+                                        UTF8_ALLOW_SURROGATE|UTF8_ALLOW_FFFF)
 #define UTF8_ALLOW_ANY                 0x00FF
 #define UTF8_CHECK_ONLY                        0x0200