version and Module-CoreList are up to date with CPAN

[perl5.git] / pad.h

diff --git a/pad.h b/pad.h
index 81d3c81..6269bdc 100644 (file)
--- a/pad.h
+++ b/pad.h
@@ -143,14 +143,14 @@ typedef enum {
 #  define ASSERT_CURPAD_LEGAL(label) \
     pad_peg(label); \
     if (PL_comppad ? (AvARRAY(PL_comppad) != PL_curpad) : (PL_curpad != 0))  \
-       Perl_croak(aTHX_ "panic: illegal pad in %s: 0x%"UVxf"[0x%"UVxf"]",\
+       Perl_croak(aTHX_ "panic: illegal pad in %s: 0x%" UVxf "[0x%" UVxf "]",\
            label, PTR2UV(PL_comppad), PTR2UV(PL_curpad));
 
 
 #  define ASSERT_CURPAD_ACTIVE(label) \
     pad_peg(label); \
     if (!PL_comppad || (AvARRAY(PL_comppad) != PL_curpad))               \
-       Perl_croak(aTHX_ "panic: invalid pad in %s: 0x%"UVxf"[0x%"UVxf"]",\
+       Perl_croak(aTHX_ "panic: invalid pad in %s: 0x%" UVxf "[0x%" UVxf "]",\
            label, PTR2UV(PL_comppad), PTR2UV(PL_curpad));
 #else
 #  define ASSERT_CURPAD_LEGAL(label)
@@ -325,7 +325,7 @@ Restore the old pad saved into the local variable opad by PAD_SAVE_LOCAL()
        PL_comppad = (PAD*) (PadlistARRAY(padlist)[nth]);       \
        PL_curpad = AvARRAY(PL_comppad);                        \
        DEBUG_Xv(PerlIO_printf(Perl_debug_log,                  \
-             "Pad 0x%"UVxf"[0x%"UVxf"] set_cur    depth=%d\n", \
+             "Pad 0x%" UVxf "[0x%" UVxf "] set_cur    depth=%d\n",     \
              PTR2UV(PL_comppad), PTR2UV(PL_curpad), (int)(nth)));
 
 
@@ -343,7 +343,7 @@ Restore the old pad saved into the local variable opad by PAD_SAVE_LOCAL()
        PL_comppad = (npad);                                    \
        PL_curpad =  PL_comppad ? AvARRAY(PL_comppad) : NULL;   \
        DEBUG_Xv(PerlIO_printf(Perl_debug_log,                  \
-             "Pad 0x%"UVxf"[0x%"UVxf"] save_local\n",          \
+             "Pad 0x%" UVxf "[0x%" UVxf "] save_local\n",              \
              PTR2UV(PL_comppad), PTR2UV(PL_curpad)));
 
 #define PAD_RESTORE_LOCAL(opad) \
@@ -351,7 +351,7 @@ Restore the old pad saved into the local variable opad by PAD_SAVE_LOCAL()
        PL_comppad = opad;                                              \
        PL_curpad =  PL_comppad ? AvARRAY(PL_comppad) : NULL;   \
        DEBUG_Xv(PerlIO_printf(Perl_debug_log,                  \
-             "Pad 0x%"UVxf"[0x%"UVxf"] restore_local\n",       \
+             "Pad 0x%" UVxf "[0x%" UVxf "] restore_local\n",   \
              PTR2UV(PL_comppad), PTR2UV(PL_curpad)));