summaryrefslogtreecommitdiff
path: root/lang/perl5.18/files/patch-pad.h
diff options
context:
space:
mode:
Diffstat (limited to 'lang/perl5.18/files/patch-pad.h')
-rw-r--r--lang/perl5.18/files/patch-pad.h46
1 files changed, 0 insertions, 46 deletions
diff --git a/lang/perl5.18/files/patch-pad.h b/lang/perl5.18/files/patch-pad.h
deleted file mode 100644
index df96aad37e16..000000000000
--- a/lang/perl5.18/files/patch-pad.h
+++ /dev/null
@@ -1,46 +0,0 @@
---- pad.h.orig 2014-10-01 01:33:00 UTC
-+++ 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)
-@@ -320,7 +320,7 @@ Restore the old pad saved into the 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)));
-
-
-@@ -338,7 +338,7 @@ Restore the old pad saved into the 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) \
-@@ -346,7 +346,7 @@ Restore the old pad saved into the 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)));
-
-