perl_5.18.patch 2.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051
  1. diff --unified --recursive a/perl5.18/lib/perl/5.18/CORE/pad.h b/perl5.18/lib/perl/5.18/CORE/pad.h
  2. --- a/perl5.18/lib/perl/5.18/CORE/pad.h 2020-08-10 09:58:43.970483379 +0300
  3. +++ b/perl5.18/lib/perl/5.18/CORE/pad.h 2020-08-10 10:00:56.850097798 +0300
  4. @@ -320,7 +320,7 @@
  5. PL_comppad = (PAD*) (PadlistARRAY(padlist)[nth]); \
  6. PL_curpad = AvARRAY(PL_comppad); \
  7. DEBUG_Xv(PerlIO_printf(Perl_debug_log, \
  8. - "Pad 0x%"UVxf"[0x%"UVxf"] set_cur depth=%d\n", \
  9. + "Pad 0x%" UVxf "[0x%" UVxf "] set_cur depth=%d\n", \
  10. PTR2UV(PL_comppad), PTR2UV(PL_curpad), (int)(nth)));
  11. @@ -338,7 +338,7 @@
  12. PL_comppad = (npad); \
  13. PL_curpad = PL_comppad ? AvARRAY(PL_comppad) : NULL; \
  14. DEBUG_Xv(PerlIO_printf(Perl_debug_log, \
  15. - "Pad 0x%"UVxf"[0x%"UVxf"] save_local\n", \
  16. + "Pad 0x%" UVxf "[0x%" UVxf "] save_local\n", \
  17. PTR2UV(PL_comppad), PTR2UV(PL_curpad)));
  18. #define PAD_RESTORE_LOCAL(opad) \
  19. @@ -346,7 +346,7 @@
  20. PL_comppad = opad; \
  21. PL_curpad = PL_comppad ? AvARRAY(PL_comppad) : NULL; \
  22. DEBUG_Xv(PerlIO_printf(Perl_debug_log, \
  23. - "Pad 0x%"UVxf"[0x%"UVxf"] restore_local\n", \
  24. + "Pad 0x%" UVxf "[0x%" UVxf "] restore_local\n", \
  25. PTR2UV(PL_comppad), PTR2UV(PL_curpad)));
  26. diff --unified --recursive a/perl5.18/lib/perl/5.18/CORE/perl.h b/perl5.18/lib/perl/5.18/CORE/perl.h
  27. --- a/perl5.18/lib/perl/5.18/CORE/perl.h 2020-08-10 09:58:43.966483390 +0300
  28. +++ b/perl5.18/lib/perl/5.18/CORE/perl.h 2020-08-10 10:01:44.649957846 +0300
  29. @@ -4254,7 +4254,7 @@
  30. EXTCONST char PL_warn_uninit[]
  31. INIT("Use of uninitialized value%s%s%s");
  32. EXTCONST char PL_warn_uninit_sv[]
  33. - INIT("Use of uninitialized value%"SVf"%s%s");
  34. + INIT("Use of uninitialized value%" SVf "%s%s");
  35. EXTCONST char PL_warn_nosemi[]
  36. INIT("Semicolon seems to be missing");
  37. EXTCONST char PL_warn_reserved[]
  38. @@ -4274,7 +4274,7 @@
  39. EXTCONST char PL_no_aelem[]
  40. INIT("Modification of non-creatable array value attempted, subscript %d");
  41. EXTCONST char PL_no_helem_sv[]
  42. - INIT("Modification of non-creatable hash value attempted, subscript \"%"SVf"\"");
  43. + INIT("Modification of non-creatable hash value attempted, subscript \"%" SVf "\"");
  44. EXTCONST char PL_no_modify[]
  45. INIT("Modification of a read-only value attempted");
  46. EXTCONST char PL_no_mem[sizeof("Out of memory!\n")]