diff options
| -rw-r--r-- | embed.h | 6 | ||||
| -rw-r--r-- | global.sym | 1 | ||||
| -rw-r--r-- | proto.h | 3 |
3 files changed, 10 insertions, 0 deletions
@@ -458,6 +458,9 @@ #endif #define looks_like_number Perl_looks_like_number #define grok_bin Perl_grok_bin +#if defined(PERL_CORE) || defined(PERL_EXT) +#define grok_bslash_c Perl_grok_bslash_c +#endif #define grok_hex Perl_grok_hex #define grok_number Perl_grok_number #define grok_numeric_radix Perl_grok_numeric_radix @@ -2870,6 +2873,9 @@ #endif #define looks_like_number(a) Perl_looks_like_number(aTHX_ a) #define grok_bin(a,b,c,d) Perl_grok_bin(aTHX_ a,b,c,d) +#if defined(PERL_CORE) || defined(PERL_EXT) +#define grok_bslash_c(a,b) Perl_grok_bslash_c(aTHX_ a,b) +#endif #define grok_hex(a,b,c,d) Perl_grok_hex(aTHX_ a,b,c,d) #define grok_number(a,b,c) Perl_grok_number(aTHX_ a,b,c) #define grok_numeric_radix(a,b) Perl_grok_numeric_radix(aTHX_ a,b) diff --git a/global.sym b/global.sym index 77883384f3..6b9b267184 100644 --- a/global.sym +++ b/global.sym @@ -274,6 +274,7 @@ Perl_load_module Perl_vload_module Perl_looks_like_number Perl_grok_bin +Perl_grok_bslash_c Perl_grok_hex Perl_grok_number Perl_grok_numeric_radix @@ -1587,6 +1587,9 @@ PERL_CALLCONV UV Perl_grok_bin(pTHX_ const char* start, STRLEN* len_p, I32* flag #define PERL_ARGS_ASSERT_GROK_BIN \ assert(start); assert(len_p); assert(flags) +PERL_CALLCONV char Perl_grok_bslash_c(pTHX_ const char source, const bool output_warning) + __attribute__warn_unused_result__; + PERL_CALLCONV UV Perl_grok_hex(pTHX_ const char* start, STRLEN* len_p, I32* flags, NV *result) __attribute__nonnull__(pTHX_1) __attribute__nonnull__(pTHX_2) |