{
return ((CPerlObj*)pPerl)->Perl_looks_like_number(sv);
}
+
+#undef Perl_grok_number
+int
+Perl_grok_number(pTHXo_ const char *pv, STRLEN len, UV *valuep)
+{
+ return ((CPerlObj*)pPerl)->Perl_grok_number(pv, len, valuep);
+}
+
+#undef Perl_grok_numeric_radix
+bool
+Perl_grok_numeric_radix(pTHXo_ const char **sp, const char *send)
+{
+ return ((CPerlObj*)pPerl)->Perl_grok_numeric_radix(sp, send);
+}
#if defined(USE_THREADS)
#endif
#if defined(USE_LOCALE_COLLATE)
}
#undef Perl_mg_size
-I32
+IV
Perl_mg_size(pTHXo_ SV* sv)
{
return ((CPerlObj*)pPerl)->Perl_mg_size(sv);
{
return ((CPerlObj*)pPerl)->Perl_my_atof(s);
}
-#if !defined(HAS_BCOPY) || !defined(HAS_SAFE_BCOPY)
+#if (!defined(HAS_MEMCPY) && !defined(HAS_BCOPY)) || (!defined(HAS_MEMMOVE) && !defined(HAS_SAFE_MEMCPY) && !defined(HAS_SAFE_BCOPY))
#undef Perl_my_bcopy
char*