Subject: | TryCatch fails needs SvUV_set perl 5.8.6 |
On FC4's version of perl 5.8.6, TryCatch fails to load after building
with the following error:
Error: Can't load
'/home/user/rpm/trycatch/TryCatch-1.001000/blib/arch/auto/TryCatch/TryCatch.so'
for module TryCatch:
/home/user/rpm/trycatch/TryCatch-1.001000/blib/arch/auto/TryCatch/TryCatch.so:
undefined symbol: SvUV_set at
/usr/lib/perl5/5.8.6/i386-linux-thread-multi/DynaLoader.pm line 230.
Applying the attached patch remedies this situation (note: I found the
lines in the patch from Scalar-List-Utils Util.xs)
Subject: | trycatch_fix_svuv_set.patch |
--- TryCatch.xs.old 2009-04-26 00:49:44.000000000 -0400
+++ TryCatch.xs 2009-05-11 10:04:31.000000000 -0400
@@ -5,6 +5,10 @@
#include "hook_op_check.h"
#include "hook_op_ppaddr.h"
+#ifndef SvUV_set
+# define SvUV_set(sv, val) (((XPVUV*)SvANY(sv))->xuv_uv = (val))
+#endif
+
static int trycatch_debug = 0;
STATIC I32