perl-PerlIO-utf8_strict/no-return-in-nonvoid-function.patch

Index: PerlIO-utf8_strict-0.004/lib/PerlIO/utf8_strict.xs
===================================================================
--- PerlIO-utf8_strict-0.004.orig/lib/PerlIO/utf8_strict.xs
+++ PerlIO-utf8_strict-0.004/lib/PerlIO/utf8_strict.xs
@@ -152,6 +152,7 @@ static STRLEN validate(pTHX_ const U8 *b
 		skip = skip_sequence(cur, end - cur);
 	PerlIOBase(handle)->flags |= PERLIO_F_ERROR;
 	report_illformed(aTHX_ cur, skip, eof);
+	return 0;
 
   noncharacter:
 	if (v < 0xF0808080)
@@ -160,6 +161,7 @@ static STRLEN validate(pTHX_ const U8 *b
 		v = (v & 0x3F) | (v & 0x3F00) >> 2 | (v & 0x3F0000) >> 4 | (v & 0x07000000) >> 6;
 	PerlIOBase(handle)->flags |= PERLIO_F_ERROR;
 	report_noncharacter(aTHX_ v);
+	return 0;
 }
 
 typedef struct {