dougm 02/05/23 21:42:57
Modified: xs typemap
Log:
need to use modperl version of sv_setref_uv, since it doesn't exist in
5.6.x
Revision Changes Path
1.8 +1 -1 modperl-2.0/xs/typemap
Index: typemap
===================================================================
RCS file: /home/cvs/modperl-2.0/xs/typemap,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -r1.7 -r1.8
--- typemap 23 May 2002 22:19:34 -0000 1.7
+++ typemap 24 May 2002 04:42:57 -0000 1.8
@@ -18,7 +18,7 @@
sv_setnv($arg, (NV)($var / APR_USEC_PER_SEC));
T_UVOBJ
- sv_setref_uv($arg, \"${ntype}\", (UV)$var);
+ modperl_perl_sv_setref_uv(aTHX_ $arg, \"${ntype}\", (UV)$var);
######################################################################
INPUT
