Perl_utf16_to_utf8() should treat "\0" like any every other odd-length input.

The "be understanding" bodge to not panic, introduced in 1de9afcdf18cf98b, is
no longer needed now that c28d61051c446453 fixes the underlying problem.

1 files changed, 0 insertions, 6 deletions

diff --git a/utf8.c b/utf8.c
index dc12df845a..c50489115e 100644
--- a/utf8.c
+++ b/utf8.c
@@ -958,12 +958,6 @@ Perl_utf16_to_utf8(pTHX_ U8* p, U8* d, I32 bytelen, I32 *newlen)
 
     PERL_ARGS_ASSERT_UTF16_TO_UTF8;
 
-    if (bytelen == 1 && p[0] == 0) { /* Be understanding. */
-	 d[0] = 0;
-	 *newlen = 1;
-	 return d + 1;
-    }
-
     if (bytelen & 1)
 	Perl_croak(aTHX_ "panic: utf16_to_utf8: odd bytelen %"UVuf, (UV)bytelen);