run regen_headerds

p4raw-id: //depot/perl@28584

diff --git a/embed.h b/embed.h
index 3c4c65c..cb2193b 100644 (file)
--- a/embed.h
+++ b/embed.h
@@ -1001,6 +1001,7 @@
 #define get_vtbl               Perl_get_vtbl
 #define pv_display             Perl_pv_display
 #define pv_escape              Perl_pv_escape
+#define pv_pretty              Perl_pv_pretty
 #define dump_indent            Perl_dump_indent
 #define dump_vindent           Perl_dump_vindent
 #define do_gv_dump             Perl_do_gv_dump
@@ -1363,6 +1364,7 @@
 #  ifdef DEBUGGING
 #if defined(PERL_CORE) || defined(PERL_EXT)
 #define dump_exec_pos          S_dump_exec_pos
+#define debug_start_match      S_debug_start_match
 #endif
 #  endif
 #endif
@@ -3187,7 +3189,8 @@
 #define sv_setsv_mg(a,b)       Perl_sv_setsv_mg(aTHX_ a,b)
 #define get_vtbl(a)            Perl_get_vtbl(aTHX_ a)
 #define pv_display(a,b,c,d,e)  Perl_pv_display(aTHX_ a,b,c,d,e)
-#define pv_escape(a,b,c,d,e)   Perl_pv_escape(aTHX_ a,b,c,d,e)
+#define pv_escape(a,b,c,d,e,f) Perl_pv_escape(aTHX_ a,b,c,d,e,f)
+#define pv_pretty(a,b,c,d,e,f,g)       Perl_pv_pretty(aTHX_ a,b,c,d,e,f,g)
 #define dump_vindent(a,b,c,d)  Perl_dump_vindent(aTHX_ a,b,c,d)
 #define do_gv_dump(a,b,c,d)    Perl_do_gv_dump(aTHX_ a,b,c,d)
 #define do_gvgv_dump(a,b,c,d)  Perl_do_gvgv_dump(aTHX_ a,b,c,d)
@@ -3550,6 +3553,7 @@
 #  ifdef DEBUGGING
 #if defined(PERL_CORE) || defined(PERL_EXT)
 #define dump_exec_pos(a,b,c)   S_dump_exec_pos(aTHX_ a,b,c)
+#define debug_start_match(a,b,c,d,e)   S_debug_start_match(aTHX_ a,b,c,d,e)
 #endif
 #  endif
 #endif

diff --git a/global.sym b/global.sym
index 4d2cb51..3b4b4e5 100644 (file)
--- a/global.sym
+++ b/global.sym
@@ -606,6 +606,7 @@ Perl_sv_usepvn_mg
 Perl_get_vtbl
 Perl_pv_display
 Perl_pv_escape
+Perl_pv_pretty
 Perl_dump_indent
 Perl_dump_vindent
 Perl_do_gv_dump

diff --git a/proto.h b/proto.h
index 928ba5e..7fa377b 100644 (file)
--- a/proto.h
+++ b/proto.h
@@ -2674,7 +2674,11 @@ PERL_CALLCONV char*      Perl_pv_display(pTHX_ SV *dsv, const char *pv, STRLEN cur, S
                        __attribute__nonnull__(pTHX_1)
                        __attribute__nonnull__(pTHX_2);
 
-PERL_CALLCONV char*    Perl_pv_escape(pTHX_ SV *dsv, const char *pv, const STRLEN count, const STRLEN max, const U32 flags)
+PERL_CALLCONV char*    Perl_pv_escape(pTHX_ SV *dsv, U8 const * const str, const STRLEN count, const STRLEN max, STRLEN * const escaped, const U32 flags)
+                       __attribute__nonnull__(pTHX_1)
+                       __attribute__nonnull__(pTHX_2);
+
+PERL_CALLCONV char*    Perl_pv_pretty(pTHX_ SV *dsv, U8 const * const str, const STRLEN count, const STRLEN max, U8 const * const start_color, U8 const * const end_color, const U32 flags)
                        __attribute__nonnull__(pTHX_1)
                        __attribute__nonnull__(pTHX_2);
 
@@ -3728,6 +3732,12 @@ STATIC void      S_dump_exec_pos(pTHX_ const char *locinput, const regnode *scan, con
                        __attribute__nonnull__(pTHX_1)
                        __attribute__nonnull__(pTHX_2);
 
+STATIC void    S_debug_start_match(pTHX_ const regexp *prog, const bool do_utf8, const char *start, const char *end, const char *blurb)
+                       __attribute__nonnull__(pTHX_1)
+                       __attribute__nonnull__(pTHX_3)
+                       __attribute__nonnull__(pTHX_4)
+                       __attribute__nonnull__(pTHX_5);
+
 #  endif
 #endif