In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/feca1ab570be3a64bda3f74fe004fab5a85e959a?hp=a5d565cd966ec58e5f3ca05b219fe919086f43b1>

- Log -----------------------------------------------------------------
commit feca1ab570be3a64bda3f74fe004fab5a85e959a
Author: Karl Williamson <[email protected]>
Date:   Mon Feb 20 21:18:28 2017 -0700

    embed.fnc: _byte_dump_string is core-only
    
    This commit, made during the freeze, was approved by the pumpking
-----------------------------------------------------------------------

Summary of changes:
 embed.fnc | 2 +-
 embed.h   | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/embed.fnc b/embed.fnc
index 0a63f4756f..3a68a3538f 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -1709,7 +1709,7 @@ ApdD      |UV     |to_utf8_case   |NN const U8 *p         
                        \
                                |NN SV **swashp                                 
\
                                |NN const char *normal|                         
\
                                NULLOK const char *special
-ApM    |char * |_byte_dump_string                                      \
+pM     |char * |_byte_dump_string                                      \
                                |NN const U8 * s                        \
                                |const STRLEN len                       \
                                |const bool format
diff --git a/embed.h b/embed.h
index 587444f0a1..5352f536f8 100644
--- a/embed.h
+++ b/embed.h
@@ -27,7 +27,6 @@
 /* Hide global symbols */
 
 #define Gv_AMupdate(a,b)       Perl_Gv_AMupdate(aTHX_ a,b)
-#define _byte_dump_string(a,b,c)       Perl__byte_dump_string(aTHX_ a,b,c)
 #define _force_out_malformed_utf8_message(a,b,c,d)     
Perl__force_out_malformed_utf8_message(aTHX_ a,b,c,d)
 #define _is_in_locale_category(a,b)    Perl__is_in_locale_category(aTHX_ a,b)
 #define _is_uni_FOO(a,b)       Perl__is_uni_FOO(aTHX_ a,b)
@@ -1163,6 +1162,7 @@
 #ifdef PERL_CORE
 #define Slab_Alloc(a)          Perl_Slab_Alloc(aTHX_ a)
 #define Slab_Free(a)           Perl_Slab_Free(aTHX_ a)
+#define _byte_dump_string(a,b,c)       Perl__byte_dump_string(aTHX_ a,b,c)
 #define abort_execution(a,b)   Perl_abort_execution(aTHX_ a,b)
 #define alloc_LOGOP(a,b,c)     Perl_alloc_LOGOP(aTHX_ a,b,c)
 #define allocmy(a,b,c)         Perl_allocmy(aTHX_ a,b,c)

--
Perl5 Master Repository

Reply via email to