aboutsummaryrefslogtreecommitdiff
path: root/security/p5-Crypt-Shark/files/extrapatch-Shark.xs
diff options
context:
space:
mode:
Diffstat (limited to 'security/p5-Crypt-Shark/files/extrapatch-Shark.xs')
-rw-r--r--security/p5-Crypt-Shark/files/extrapatch-Shark.xs18
1 files changed, 18 insertions, 0 deletions
diff --git a/security/p5-Crypt-Shark/files/extrapatch-Shark.xs b/security/p5-Crypt-Shark/files/extrapatch-Shark.xs
new file mode 100644
index 000000000000..baec9dae7647
--- /dev/null
+++ b/security/p5-Crypt-Shark/files/extrapatch-Shark.xs
@@ -0,0 +1,18 @@
+--- Shark.xs.orig Sat Dec 31 04:10:06 2005
++++ Shark.xs Sat Dec 31 04:10:37 2005
+@@ -4,6 +4,15 @@
+ #include "ppport.h"
+ #include "_shark.c"
+
++/* try to be compatible with older perls */
++/* SvPV_nolen() macro first defined in 5.005_55 */
++/* this is slow, not threadsafe, but works */
++#include "patchlevel.h"
++#if (PATCHLEVEL == 4) || ((PATCHLEVEL == 5) && (SUBVERSION < 55))
++static STRLEN nolen_na;
++# define SvPV_nolen(sv) SvPV ((sv), nolen_na)
++#endif
++
+ typedef struct shark {
+ ddword roundkey_enc[14];
+ ddword roundkey_dec[14];