}
#undef Perl_sv_utf8_upgrade
-void
+STRLEN
Perl_sv_utf8_upgrade(pTHXo_ SV *sv)
{
- ((CPerlObj*)pPerl)->Perl_sv_utf8_upgrade(sv);
+ return ((CPerlObj*)pPerl)->Perl_sv_utf8_upgrade(sv);
}
#undef Perl_sv_utf8_downgrade
#if defined(PERL_IN_UTIL_C) || defined(PERL_DECL_PROT)
# if defined(LEAKTEST)
# endif
-# if defined(EBCDIC)
-# endif
#endif
#if defined(PERL_OBJECT)
#endif